اذهب الي المحتوي
أوفيسنا

الغاء زر الامر Esc اثناء تنفيذ الكود


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

 

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

تحية طيبة للجميع ارجو ان تكون بخير و صحة  

ارفقت ملف اكسل و صورة 

بدخل الملف userform18 يحتوي على  زر امر  يقوم بفرز و تجميع الصفحات 

وعند تنفيذ الكود يضهر userfor16 و هو عبارة عن عداد مستوى تقدم الكود 

لكن المشكلة انه اثناء تنفيذ الكود اذا ضغط على زر Esc في لوحة المقاتيح تظهر الرسالة المرفة في الصورة 

اريد طريقة بحيث يتم الغاء عمل زر Esc اثناء تنفيذ الكود او ظهور userform16 

بحيث الاسلوب الوحيد للخروج من userfoem 16 هو الضغط على زر "خروج" فقط

علماً ان نسخة الاوفيس لدي 2007

راجياً مساعدتكم و خبراتكم 

و تحياتي للجميع 

اخوكم عبدالله 

 

1.jpg

Book1.xlsm

رابط هذا التعليق
شارك

  • 2 weeks later...
7 ساعات مضت, abed14092017 said:

لم ينجح اي حل مقدم 

 

أخي الكريم الحل المقدم من أخينا @AbuuAhmed صحيح جدا

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

الطريقة الصحيحة

أن تضع السطر الخاص بتعطيل زر esc أولا

ثم أكواد الاجراء الخاص بك

وفي نهاية تضع كود تمكين زر esc

Sub yoursubname()
    Application.EnableCancelKey = xlDisabled
    ' ضع هنا الكود الذي تريد تنفيذه
    Application.EnableCancelKey = xlInterrupt
End Sub

بالتوفيق

رابط هذا التعليق
شارك

  • 4 weeks later...
On 8/8/2024 at 11:01 AM, abed14092017 said:

 

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

تحية طيبة للجميع ارجو ان تكون بخير و صحة  

ارفقت ملف اكسل و صورة 

بدخل الملف userform18 يحتوي على  زر امر  يقوم بفرز و تجميع الصفحات 

وعند تنفيذ الكود يضهر userfor16 و هو عبارة عن عداد مستوى تقدم الكود 

لكن المشكلة انه اثناء تنفيذ الكود اذا ضغط على زر Esc في لوحة المقاتيح تظهر الرسالة المرفة في الصورة 

اريد طريقة بحيث يتم الغاء عمل زر Esc اثناء تنفيذ الكود او ظهور userform16 

بحيث الاسلوب الوحيد للخروج من userfoem 16 هو الضغط على زر "خروج" فقط

علماً ان نسخة الاوفيس لدي 2007  jiofi.local.html tplinklogin

راجياً مساعدتكم و خبراتكم 

و تحياتي للجميع 

اخوكم عبدالله 

 

1.jpg

Book1.xlsm 664.69 kB · 15 downloads

جرب أن يكون الكود في موديول عام.

 
تم تعديل بواسطه FranklinWrights
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



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

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

Important Information