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

نسخ ورقة


أ/حكيم

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

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

Application.DisplayAlerts = True

   Sheets("الاصل").Select  
i = InputBox("How many copies do you what?", "Salim Ask You")

     If i > 15 Then i = 15 ' اضف هذا السطر على الكود للحصول عل الشرط اللازم بعد الرسالة مباشرة
     
Application.ScreenUpdating = False
       

 

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

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

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



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

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

Important Information