F1
شغال لوحدة تمام
ولكن للأمان حيث لا اريد اى أحد ان يفتح نموذج خاص أريد أن اجعله بزرارين
كان هناك صورة للكيبورد خاصة بـ
KeyCode
و لكن بحثت عنها ول م أجدها
السلام عليكم ورحمة الله و بركاته
اعمل على نموذج فيه تكرار للسجلات فى النموذج الفرعى
احتاج عند الضغط على تكرار 1
أن يسألنى كم سجل تريد وعند كتابة 4 مثلا يكرر 4 سجلات
وعند الضغط على تكرار 2
يكرر بعض الحقول الى السجل التالى
أمر الدفع - رقم الشيك - بتاريخ - شهر
وجزاكم الله خيرا
test5005.rar
السلام عليكم ورحمة الله بركاتيمكننى بالضغط على زرار
ctrl + F1
الانتقال الى نموذج أخر
و لكن تاتنى رسالة خطأ فى زرار كنترول
هل من مساعدة
و الرجاء ممكن اكواد الخاصة بزراير الكيبورد
If KeyCode = vbKeyF1 and KeyCode = vbKeyctrl Then
DoCmd.Close
DoCmd.OpenForm "Mab"
End If
وجزاكم الله خيرا
أستاذى
بعد و ضع الشرط فى الاستعلام
[forms]![Mad]![id]
مع الكود
DoCmd.OpenReport "mdfoaatSub", acViewPreview
تم المعاينة جيدأ
ولكن هل يجب هذا الشرط فى التقرير
"وفي التقرير وفي مصدر التقرير وفي حقل id ضع الشرط التالي في المعيار"
وجزاك الله كل خير
السلام عليكم ورحمة الله وبركاته
تأتينى مشكلة عند معاينة الطباعة فى هذا النموذج حيث أريد الربط بواسطة
id
و لكن لا أعلم أين هى المشكلة برجاء المساعدة
و جزاكم الله خيراً
test5005.rar
شكرا لك استاذى
عند تغير فتح النموذج من
'DoCmd.OpenForm "Kahrambain"
الى
stDocName = "Kahrambain"
DoCmd.OpenForm stDocName, , , stLinkCriteria
النموذج اشتغل تمام
جزاك الله خيرا
أستاذى
أبو إبراهيم الغامدي
تأتينى مشكلة جديدة عند فتح نموذج أخر
عند التصغير من لالنموذج الاخر المفتوح لا تأتى الايقونة فى شريط المهام هل له حل
وجزاكم الله خيراً
السلام عليكم ورحمة الله و بركاته
كنت اريد ان اتعلم استخدام
if
فى الاستعلام
لو المدينة ميت غمر تساوى 1
لو المدينة زفتى تساوى 2
لو المدينة المنصورة تساوى 3
ifelse المدينة لاتوجد مدينة
وجزاكم الله خيرا
test 7000.rar