اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

إرسال إيميل من الإكسل


NAWAS

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

السلام عليكم

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

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

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

فكيف الطريقة

رابط هذا التعليق
شارك

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

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

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

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

Application.Dialogs(xlDialogSendMail).Show

رابط هذا التعليق
شارك

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

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

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

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

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

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

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

رابط هذا التعليق
شارك

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

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

Important Information