ابو فارس2013 قام بنشر فبراير 25, 2015 قام بنشر فبراير 25, 2015 السلام عليكم ورحمة الله وبركاته لقد استطعت بفضل الله ان استطيع ان ادمج بين كودين واحد من شرح الاستاذ ابو تراب لارسال الايميل من الاوت لووك واخر من صنع اخونا المهندس ابن مصر ووضعته في الملف المرفق ولكن صعبت علي نقطتين لم استطع ان اضع لها حل يرجى من الاستاذة الكبار شرح لي كيفية القيام بالاضافات التالية : 1- جعل ملف الاكسل المرفق يرسل الايميل من مجرد فتح الملف دون الضرورة للضغط على زر send 2- يوجد الان رسالة تاكيد الايميل قبل الارسال اريد الغائها وشكرا لجميع من نشر وينشر هذا العلم الواسع وساعد ويساعد الجميع دون استثناء
ابو فارس2013 قام بنشر فبراير 26, 2015 الكاتب قام بنشر فبراير 26, 2015 الحمدلله تأخركم علي بالرد ساعدني لاكتشف طريقة الغاء رسالة تاكيد الايميل بحذف الكود التالي: If MsgBox("We will send the notice to Mr. " & vbCrLf & vbCrLf & ToEmail & vbCrLf & vbCrLf & "YOU LIKE TO CONTINUE?", vbInformation + vbYesNo + vbMsgBoxRight, "ÇÑÓÇá ÇÔÚÇÑ") = vbYes وتعويضه ب: If AUTOEMAIL Then باقي الطلب الاول ارسال الايميل مباشرة بعد فتح الملف
KHMB قام بنشر فبراير 26, 2015 قام بنشر فبراير 26, 2015 السلام عليكم ورحمة الله اخي ابو فارس لجعل ارسال البريد عند فتح الملف مرفق صورة Send E.mail when open Excel file.rar 1
ابو فارس2013 قام بنشر فبراير 26, 2015 الكاتب قام بنشر فبراير 26, 2015 (معدل) بالظبط الان وجدتها في ملف المهندس ابن مصر Private Sub Workbook_Open() btnSendEmail End Sub شكرا لك اخي على المساعدة :fff: تم تعديل فبراير 26, 2015 بواسطه ابو فارس2013
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.