محمد7788 قام بنشر يناير 15, 2020 مشاركة قام بنشر يناير 15, 2020 عندى ملف وعملت ماكرو لازالة بيانات عمود معين واريد ان اضيف للماكرو رسالة تحذير قبل البدء فى الحذف فكيف افعلها؟ عذرا استاذى الملف المرفق به زر باسم شيت بيانات وداخل هذه الصفحة زر مسح البيانات متصل بماكرو باسم clear المطلوب انى عندما اضغط على زر مسح البيانات يعطينى رسالة تحذيرية قبل تنفيذ الامر برنامج التنسيق تعديل14.xlsm رابط هذا التعليق شارك More sharing options...
أفضل إجابة Ali Mohamed Ali قام بنشر يناير 16, 2020 أفضل إجابة مشاركة قام بنشر يناير 16, 2020 تفضل هذا هو الكود Sub clear() kk = MsgBox("هل تريد مسح البيانات ؟", vbYesNo) If kk = vbYes Then Range("b11:C300").ClearContents Range("J11:k300").ClearContents End If End Sub برنامج التنسيق تعديل14.xlsm 3 رابط هذا التعليق شارك More sharing options...
محمد7788 قام بنشر يناير 17, 2020 الكاتب مشاركة قام بنشر يناير 17, 2020 جزاك الله خيرا استاذ على طلب اخر بعذ اذنك كيف اقوم بعمل زر انهاء وخروج من البرنامج؟ رابط هذا التعليق شارك More sharing options...
Ali Mohamed Ali قام بنشر يناير 17, 2020 مشاركة قام بنشر يناير 17, 2020 تفضل Sub exit_end() For Each w In Application.Workbooks w.Save Next w Application.Quit End Sub وهذا كود أخر ايضا يلبى طلبك Sub testSave() Application.DisplayAlerts = False ThisWorkbook.Save Application.DisplayAlerts = True Application.Quit End Sub 3 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان