تداحل في الاكواد

[TQTHAMI]

السلام عليكم ورحمة الله وبركاتة

مرفق مثال وضعت كود ارسال رسالة نصية واتس وحصل تعطيل لكود اخر 

اسال الله العلي العظيم ان اجد حلا له عند اخواني في هذي المنتدى العامر 

code.accdb

[ابوخليل]

يبدو انك لم تجرب مثالك

يوجد اكواد كثيرة تطلب جداول ونماذج غير موجودة ، ومتغيرات كثيرة من غير تعريف واعلان

يجب ان تكون دقيقا .. تضع فقط كود الواتس والكود الذي حصل التعطيل به 

[TQTHAMI]

4 ساعات مضت, ابوخليل said:

وجد اكواد كثيرة تطلب جداول ونماذج غير موجودة ، ومتغيرات كثيرة من غير تعريف واعلان

هلا وغلا ابو خليل

كل الاكواد لها عملها المشكله تكمن في 

عند اضافة ه1ا الكود والخاص بمتغير ارسال رسالة وهو

Option Explicit
#If VBA7 Then
   Private Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
#Else
   Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
#End If                                                                              'بعد وضع هذا تم التضارب في الاكواد

وعند تشغيل النموذج بضهر هذا الخطاء

وتقبل تحياتي

تم تعديل مارس 2, 2023 بواسطه TQTHAMI
اخطاء املائية

[TQTHAMI]

الحمد لله تم حل الاشكالية

الشكر لله ثم للأخ ابو خليل

[ابوخليل]

الحمد لله