اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

السلام عليكم

أريد طريقة لكي أقوم بإرسال إيميل بالأوت لوك عن طريق الإكسل

سأقوم أنا بعمل مربع للرسالة ومربع للموضوع ومربع للمرسل إليه

وأريد ماكرو يقوم بسحب هذه البيانات وإرسالها عن طريق الأوت لوك

فكيف الطريقة

قام بنشر

السلام عليكم ...

لا أعرف بالضبط كيفية القيام بالعملية كاملة عن طريق كود الـ VBA , ولكن سأشرح الطريقة اليدوية :

اضغط على الخيار (Mail Recipient (as Recipient من القائمة الفرعية Send To القائمة File ليفتح لك برنامج البريد الافتراضي . نغير العنوان الافتراضي ونكتب بريد المرسل إليه ونضغط على Send

يمكن إظهار برنامج البريد عن طريق الكود :

Application.Dialogs(xlDialogSendMail).Show

قام بنشر

شكراً لك أستاذ محمد

ولكن ما أريده هو أنني سأعتبر أن الخلية B1 تحتوي على عنوان المرسل إليه

والخلية B3 تحتوي على الموضوع

والخلية B5 تحتوي على الرسالة

والمطلوب هو أن يرسل الكود الرسالة عن طريق برنامج الإيميل الإفتراضي مباشرة أي بدون أن

أضغط على زر Send في برنامج الإيميل ( ولنفترض أننا نستخدم OutLook )

ولكم جزيل الشكر

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information