اريد كود اخفاء userform اذا كان مفتوح

[وليد عبدالغني]

اذا كان لدي ماكرو ينفذ ضمن ماكرو اخر

الاول

Sub end_userform()
userform1.Hide
End Sub

عند تنفيذ الماكرو الثاني واليوزر فورم مفتوح ليس هناك مشكلة

لكن اذاكان مغلق يقف تنفيذ الماكرو الثاني

 

 

المطلوب صيغة اغلاق اذا كان مفتوح واذا كان مغلق يكمل التنفيذ

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

يمكنك أخي إضافة سطر في أول الكود لتلافي الخطأ

On Error Resume Next

[وليد عبدالغني]

الف شكر علي الرد

عند اضافة

On Error Resume Next

يتم تنفيذ الماكرو مرة صح وثاني مرة يعطي خطأ   ورسالة الخطا تكون في الماكرو الاول end_userform

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

ممكن ارفاق ملفك لنتمكن من درسة الكود ووضع ايدينا على المشكلة؟