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

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

قام بنشر

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

لدي نموذجين frm1 و frm2 في كلا النموذجين زر امر يقوم بفتح النموذج ذاته frm

هل من كود او ماكرو يقوم بالامر الذي في زر ال frm مع مراعاة اي النموذجين تم فتحه ؟؟

والمرفق للتوضيح

 ولكم جزيل الشكر والتقدير  والدعاء للجميع

form.rar

قام بنشر
17 ساعات مضت, ابو عبدلله said:

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

لدي نموذجين frm1 و frm2 في كلا النموذجين زر امر يقوم بفتح النموذج ذاته frm

هل من كود او ماكرو يقوم بالامر الذي في زر ال frm مع مراعاة اي النموذجين تم فتحه ؟؟

والمرفق للتوضيح

 ولكم جزيل الشكر والتقدير  والدعاء للجميع

form.rar

لا اعرف اخي  

هل هو ما فهمته شوف المرفق


On Error Resume Next
Forms!frm1!txt = 1
Forms!frm2!txt = 1
DoCmd.Close

 

form (1).rar

قام بنشر
منذ ساعه, ابو ياسين المشولي said:

لا اعرف اخي  

 

بارك الله بك اخي الكريم ابو ياسين 

هذا هو المطلوب ولكن ما اريده هو أمر من نموذج يفوم بفحص النموذج الخلفي اذ كان مفتوح ينفذ وان لم يكن يلغي

واذا وجد النموذج الآخر مفتوح يقوم بالامر الآخر وهكذا 

ما رأيك أخي ابو ياسين 

ولك الشكر مرة ثانية

قام بنشر
1 ساعه مضت, ابو عبدلله said:

بارك الله بك اخي الكريم ابو ياسين 

هذا هو المطلوب ولكن ما اريده هو أمر من نموذج يفوم بفحص النموذج الخلفي اذ كان مفتوح ينفذ وان لم يكن يلغي

واذا وجد النموذج الآخر مفتوح يقوم بالامر الآخر وهكذا 

ما رأيك أخي ابو ياسين 

ولك الشكر مرة ثانية

جرب هذا

On Error Resume Next
 If Screen.ActiveForm.Name Then
 Forms!frm1!txt = 1
DoCmd.Close acForm, "frm"
End If
If Screen.ActiveForm.Name Then
Forms!frm2!txt = 1
DoCmd.Close acForm, "frm"
End If

 

  • Like 1
قام بنشر
في ٢٥‏/١‏/٢٠١٩ at 19:34, ابو ياسين المشولي said:

جرب هذا



 

أخي الكريم ابو ياسين بارك الله بعطائك ولك كل الشكر 

هل بالامكان جعلها بماكرو ؟؟ 

اي الماكرو يقوم الفحص النماذج وتنفيذ الامر حسب النموذج الخلفية ؟

قام بنشر
17 دقائق مضت, ابو عبدلله said:

أخي الكريم ابو ياسين بارك الله بعطائك ولك كل الشكر 

هل بالامكان جعلها بماكرو ؟؟ 

اي الماكرو يقوم الفحص النماذج وتنفيذ الامر حسب النموذج الخلفية ؟

للاسف ما استخدم الماكرو كثير

  • Like 1

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information