Skip to main content

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

Author: Xiaoyang Last Modified: 2025-05-30

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

إرسال المصنف الحالي عبر Outlook من Excel باستخدام أمر الحفظ والإرسال

إرسال المصنف الحالي عبر Outlook كمرفق من Excel باستخدام كود VBA


إرسال المصنف الحالي عبر Outlook من Excel باستخدام أمر الحفظ والإرسال

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

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

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

doc-send-workbook1

نصائح: إذا كنت تستخدم Excel 2007، يرجى النقر فوق زر Office > إرسال، انظر لقطة الشاشة:

doc-send-workbook4

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

doc-send-workbook5

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

doc-send-workbook2

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

doc-send-workbook3

ملاحظات:

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 لتشغيل هذا الكود، وستظهر مربع مطالبة، انقر فوق السماح، وسيتم إرسال هذا المصنف.

doc-send-workbook6

ملاحظات:

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

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


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

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

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

أفضل أدوات الإنتاجية لمكتب العمل

🤖 Kutools AI Aide: أحدث ثورة في تحليل البيانات من خلال: التنفيذ الذكي |توليد الشيفرة |إنشاء الصيغ المخصصة |تحليل البيانات وتوليد الرسوم البيانية |استدعاء الوظائف المحسنة
الميزات الشائعة: البحث، تمييز أو وضع علامة على المكررات | حذف الصفوف الفارغة | دمج الأعمدة أو العنوان دون فقدان البيانات | تقريب ...
بحث متقدم: بحث V متعدد المعايير | بحث V متعدد القيم | بحث في عدة ورقات | مطابقة غامضة ....
قائمة منسدلة متقدمة: إنشاء قائمة منسدلة بسرعة | قائمة منسدلة تابعة | قائمة منسدلة متعددة الاختيار ....
إدارة الأعمدة: إضافة عدد محدد من الأعمدة | نقل الأعمدة | تبديل حالة إظهار الأعمدة المخفية | مقارنة النطاق والأعمدة ...
ميزات مميزة: التركيز على الشبكة | عرض التصميم | شريط الصيغ المحسن | أدوات المصنف & أدوات الورقة العمل | مكتبة النص التلقائي (Auto Text) | منتقي التاريخ | دمج البيانات | تشفير/فك تشفير الخلايا | إرسال البريد الإلكتروني حسب القائمة | مرشح متقدم | تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ...) | أكثر من50 نوع من الرسوم البيانية (مخطط جانت، ...) | أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...) |19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ...) |12 أداة تحويل (تحويل إلى كلمات، تحويل العملة، ...) |7 أدوات دمج وتقسيم (دمج متقدم للصفوف، تقسيم الخلايا، ...) | ... والمزيد

عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...


Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير

  • تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
  • افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
  • يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!