كيفية إرسال المصنف الحالي من خلال Outlook من Excel؟

ربما تقوم دائمًا بعمل تقرير وتعديله في مصنف Excel ، بعد الانتهاء منه ، تحتاج إلى إرسال التقرير المحفوظ الحالي إلى مدير القسم الخاص بك في أقرب وقت ممكن. كيف يمكنك إرسال المصنف الحالي بالكامل بسرعة إلى شخص معين دون فتح Outlook من Excel؟

أرسل المصنف الحالي من خلال Outlook من Excel باستخدام الأمر Save & Send

أرسل المصنف الحالي من خلال Outlook كمرفق من Excel مع رمز VBA

أرسل المصنف الحالي من خلال Outlook من Excel باستخدام الأمر Save & Send

مع هذا حفظ وإرسال الأمر في Excel ، يمكنك بسرعة إرسال المصنف بأكمله كمرفق ، كملف PDF ، كملف XPS أو فاكس عبر الإنترنت عبر Outlook الخاص بك. يمكنك القيام بذلك على النحو التالي:

1. افتح المصنف الذي تريد إرساله.

2. انقر قم بتقديم > حفظ وإرسال > إرسال باستخدام البريد الإلكتروني في Excel 2010 ، راجع لقطة الشاشة:

تنويهات: إذا كنت تستخدم Excel 2007 ، فالرجاء النقر فوق زر المكتب > أرسل، انظر لقطة الشاشة:

في Excel 2013 ، الرجاء الضغط قم بتقديم > مشاركة > البريد الإلكتروني، انظر لقطة الشاشة:

3. ثم اختر تنسيقًا واحدًا تريد إرسال ملف Excel من ملف الإرسال باستخدام البريد الإلكتروني القسم ، في هذه الحالة ، انقر فوق إرسال كمرفق زر رمز ، انظر لقطة الشاشة:

4. وتظهر نافذة تحرير في Outlook ، أدخل أسماء المستلمين في ملف إلى و Cc مربعات النص ، واكتب موضوعًا في ملف الموضوع مربع ، يمكنك إدخال بعض الرسائل في مربع المقدمة أيضًا ، انظر لقطة الشاشة:

الملاحظات:

1. تعمل هذه الطريقة فقط عند استخدام Outlook كبرنامج البريد الخاص بك.

2. بعد إرسال المصنف ، يمكنك الانتقال إلى Outlook للتحقق مما إذا كان قد تم إرسال البريد الإلكتروني بنجاح.

أرسل المصنف الحالي من خلال Outlook كمرفق من Excel مع رمز VBA

هنا ، يمكنك أيضًا إرسال المصنف الحالي كمرفق من Excel برمز VBA التالي ، يرجى اتباع الخطوات التالية:

1. افتح المصنف الذي ترغب في إرساله.

2. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

3. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.

كود فبا: أرسل المصنف الحالي كمرفق من إكسيل

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

ملاحظات: في الكود أعلاه ، يمكنك تغيير المعلومات التالية حسب حاجتك.

• .إلى = "skyyang@extendoffice.com "
• .CC = ""
• .BCC = ""
• .Subject = "ميزة kte"
• .Body = "مرحبًا ، يرجى مراجعة هذا المستند وقراءته ، شكرًا لك."

4. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وسوف يظهر مربع موجه ، انقر فوق السماح، وقد تم إرسال هذا المصنف.

الملاحظات:

1. يتوفر هذا الرمز فقط عند استخدام Outlook كبرنامج البريد الخاص بك.

2. بعد إرسال المصنف ، يمكنك الانتقال إلى Outlook الخاص بك للتأكد من إرسال البريد الإلكتروني بنجاح.

مقالات ذات صلة:

كيفية إرسال ورقة العمل فقط من خلال Outlook من Excel؟

كيفية إرسال / إرسال مجموعة من الخلايا عبر البريد الإلكتروني من خلال Outlook من Excel؟