أرجو المساعدة في إكمال هذا الفورم ( ادخال و استعلام )

[KHMB]

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

اخي تفضل كـــــود آخــــــــــــــــــــــــــــــــــــــر سطرين فقط

عمل منع إغلاق الفورم بعلامة الخروج إكس X

X كود آخر منع اغلاق الفورم من.rar

[عبد العزيز البسكري]

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

اخي تفضل تم عمل منع إغلاق الفورم بعلامة الخروج إكس X

ألف شكر يا غالي على الإضافة الرائعة التي كنت أبحث عنها..فقط الملف الثاني لم يشتغل معي.. بارك الله فيك .. جزاك الله خيرًا و زادها بميزان حسناتك ..

تم تعديل أبريل 7, 2015 بواسطه عبد العزيز البسكري

[KHMB]

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode <> 1 Then Cancel = 1
Me.Caption = "هذه الخاصية لا تعمل فضلا استخدم زر الخروج"
MsgBox "هذه الخاصية لا تعمل فضلا استخدم زر الخروج"

End Sub

السلام عليكم ورحمة الله
اخي انا نزلت المرفق الثاني من النت وجربتة اشتغل لانة لايوجد شي تغيير سوى سطرين والكود

[عبد العزيز البسكري]

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

If CloseMode <> 1 Then Cancel = 1

Me.Caption = "هذه الخاصية لا تعمل فضلا استخدم زر الخروج"

MsgBox "هذه الخاصية لا تعمل فضلا استخدم زر الخروج"

End Sub

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

اخي انا نزلت المرفق الثاني من النت وجربتة اشتغل لانة لايوجد شي تغيير سوى سطرين والكود

تمام التمام .. ألف شكر سيّدي الفاضل ..جزاك الله خيرا

[عبد العزيز البسكري]

هل من مساعدة أساتذتي الأفاضل ..بارك الله فيكم وجعل كل حرف مما ساعدتموني به صدقة جارية إن شاء الله ..المطلوب في الشرح على الشيت

1111.rar

تم تعديل أبريل 8, 2015 بواسطه عبد العزيز البسكري

[عبد العزيز البسكري]

للرّفع بارك الله فيكم .. و رفع الله قدركم و جاهكم .. و معذرة على الالحاح في طلبي أساتذتي الأعزّاء

[ياسر خليل أبو البراء]

أخي عبد العزيز إذا كان طلبك طلب جديد فيستحب طرحه في موضوع مستقل ..حتى تجد المعاونة من الأخوة الأعضاء جميعهم

[عبد العزيز البسكري]

أخي عبد العزيز إذا كان طلبك طلب جديد فيستحب طرحه في موضوع مستقل ..حتى تجد المعاونة من الأخوة الأعضاء جميعهم

السّلام عليكم و رحمة الله و بركاته أستاذنا القدير ياسر خليل ..طلبي متعلّق بنفس الموضوع و هو في الملف المرفق الأخير باسم 1111