خالد المصـــــــــــرى

Sub VeryHiddenSelectedSheets() Dim wks As Worksheet On Error GoTo ErrorHandler For Each wks In ActiveWindow.SelectedSheets wks.Visible = xlSheetVeryHidden Next Exit Sub ErrorHandler: MsgBox "A workbook must contain at least one visible worksheet.", vbOKOnly, "Unable to Hide Worksheets" End Sub

انا عايز الكود يعطل استرجاعها من هنا

المطلوب كود

عمل كود لاخفاء شريط اوراق العمل كود.xlsx

شكرا تم الحل

الكود في خطأ

عمل زر خروج برسالة هتريد الحفظ بنعم او لا زر.xlsx

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

قطع الارتباط الموجود في ملف الاكسل سجلات0.xlsb

البقاء لله وحده ربنا يرحمه ويغفر له

جمع عدد ايام و عدد اشهر و سنوات مع التقريب.rar

فيه خلايا المفروض متتمسحش

مشكلة في زيادة نطاق مسح محتويات الخلايا تصفير.xlsb