كيفية إرسال المصنف الحالي عبر Outlook من Excel؟
ربما تقوم دائمًا بإعداد وتعديل التقارير في مصنف Excel، وبعد الانتهاء منها، تحتاج إلى إرسال التقرير المحفوظ حاليًا إلى مدير قسمك في أسرع وقت ممكن. كيف يمكنك بسرعة إرسال المصنف بالكامل الخاص بك إلى الشخص المحدد دون فتح Outlook من Excel؟
إرسال المصنف الحالي عبر Outlook من Excel باستخدام أمر الحفظ والإرسال
إرسال المصنف الحالي عبر Outlook كمرفق من Excel باستخدام كود VBA
إرسال المصنف الحالي عبر Outlook من Excel باستخدام أمر الحفظ والإرسال
مع هذا الأمر الحفظ والإرسال في Excel، يمكنك بسرعة إرسال المصنف بالكامل كمرفق، كملف PDF، كملف XPS أو فاكس إنترنت عبر Outlook الخاص بك. يمكنك القيام بذلك كما يلي:
1. افتح المصنف الذي تريد إرساله.
2. انقر فوق ملف > حفظ وإرسال > إرسال باستخدام البريد الإلكتروني في Excel 2010، انظر لقطة الشاشة:
نصائح: إذا كنت تستخدم Excel 2007، يرجى النقر فوق زر Office > إرسال، انظر لقطة الشاشة:
في Excel 2013، يرجى النقر فوق ملف > مشاركة > البريد الإلكتروني، انظر لقطة الشاشة:
3. ثم اختر تنسيقًا واحدًا تريد إرسال Excel به من قسم الإرسال باستخدام البريد الإلكتروني، في هذه الحالة، أنقر فوق أيقونة إرسال كمرفق، انظر لقطة الشاشة:
4. ستظهر نافذة تحرير Outlook، أدخل أسماء المستلمين في خانات النص إلى ونسخة، واكتب موضوعًا في خانة الموضوع، يمكنك أيضًا إدخال رسالة في خانة المقدمة، انظر لقطة الشاشة:
ملاحظات:
1. تعمل هذه الطريقة فقط عندما تستخدم Outlook كبرنامج بريدك.
2. بعد إرسال المصنف، يمكنك الانتقال إلى Outlook الخاص بك للتحقق مما إذا كان البريد الإلكتروني قد تم إرساله بنجاح.
إرسال المصنف الحالي عبر Outlook كمرفق من Excel باستخدام كود VBA
هنا، يمكنك أيضًا إرسال المصنف الحالي كمرفق من Excel باستخدام الكود التالي لـ VBA، يرجى القيام بالخطوات التالية:
1. افتح المصنف الذي ترغب في إرساله.
2. اضغط مع الاستمرار على مفتاحي ALT + F11، وسيتم فتح نافذة Microsoft Visual Basic for Applications.
3. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.
كود VBA: إرسال المصنف الحالي كمرفق من Excel
Sub SendWorkBook()
'Update 20131209
Dim OutlookApp As Object
Dim OutlookMail As Object
Set OutlookApp = CreateObject("Outlook.Application")
Set OutlookMail = OutlookApp.CreateItem(0)
On Error Resume Next
With OutlookMail
.To = "skyyang@extendoffice.com"
.CC = ""
.BCC = ""
.Subject = "kte feature"
.Body = "Hello, please check and read this document, thank you."
.Attachments.Add Application.ActiveWorkbook.FullName
.Send
End With
Set OutlookMail = Nothing
Set OutlookApp = Nothing
End Sub
ملاحظة: في الكود أعلاه، يمكنك تغيير المعلومات التالية حسب حاجتك الخاصة.
- .to = "skyyang@extendoffice.com"
- .CC = ""
- .BCC = ""
- .Subject = "kte feature"
- .Body = "مرحبًا، يرجى التحقق وقراءة هذا المستند، شكرًا لك."
4. ثم انقر فوق مفتاح F5 لتشغيل هذا الكود، وستظهر مربع مطالبة، انقر فوق السماح، وسيتم إرسال هذا المصنف.
ملاحظات:
1. يعمل هذا الكود فقط عند استخدام Outlook كبرنامج بريدك.
2. بعد إرسال المصنف، يمكنك الذهاب إلى Outlook الخاص بك للتأكد من أن البريد الإلكتروني قد تم إرساله بنجاح.
مقالات ذات صلة:
كيفية إرسال ورقة العمل فقط عبر Outlook من Excel؟
كيفية إرسال / إيميل نطاق الخلايا عبر Outlook من Excel؟
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel باستخدام Kutools لـ Excel، واختبر كفاءة غير مسبوقة. Kutools لـ Excel يوفر أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة الأكثر أهمية بالنسبة لك...
Office Tab يجلب واجهة التبويب إلى Office ويجعل عملك أسهل بكثير
- تفعيل تحرير وقراءة عبر التبويبات في Word، Excel، PowerPoint، Publisher، Access، Visio وProject.
- افتح وأنشئ عدة مستندات في تبويبات جديدة في نفس النافذة، بدلاً من نوافذ مستقلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات اليومية من الفأرة!
جميع إضافات Kutools. مثبت واحد
حزمة Kutools for Office تجمع بين إضافات Excel وWord وOutlook وPowerPoint إضافة إلى Office Tab Pro، وهي مثالية للفرق التي تعمل عبر تطبيقات Office.





- حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
- مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
- الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
- تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد