2saad قام بنشر فبراير 10 مشاركة قام بنشر فبراير 10 اخواني اعضاء المنتدي الكرام بعد سلام الله عليكم ورحمة الله وبركاته لو سمحتم عايز اطبق الكود علي ملف اكسيل Sub HideShowSheets() 'إعلان متغيرات Dim ws As Worksheet Dim i As Long 'الحصول على أسماء أوراق العمل من قائمة For i = 1 To Sheets.Count Sheets(i).Name = Sheets(i).Name & " (" & i & ")" Next i 'إظهار يوزر فورم UserForm1.Show 'التعامل مع خيارات يوزر فورم If UserForm1.Option1.Value = True Then 'إخفاء جميع أوراق العمل For Each ws In ThisWorkbook.Worksheets ws.Visible = xlVeryHidden Next ws 'إظهار ورقة العمل المحددة Sheets("Sheet1").Visible = xlVisible ElseIf UserForm1.Option2.Value = True Then 'إظهار جميع أوراق العمل For Each ws In ThisWorkbook.Worksheets ws.Visible = xlVisible Next ws End If 'إخفاء يوزر فورم UserForm1.Hide End Sub mm.xlsm رابط هذا التعليق شارك More sharing options...
abouelhassan قام بنشر فبراير 11 مشاركة قام بنشر فبراير 11 وضح طلبك اذا كان بدك تطبيق الكود فقط أرى انك تحاول طالما لديك الكود للتعلم أما إذا كان شى ثانى برجاء التوضيح 1 رابط هذا التعليق شارك More sharing options...
2saad قام بنشر فبراير 12 الكاتب مشاركة قام بنشر فبراير 12 أنا عايز اتعلم اطبق هذا الكود أو لو عند حضرتك كود ثان أكون شاكر حضرتك رابط هذا التعليق شارك More sharing options...
abouelhassan قام بنشر فبراير 12 مشاركة قام بنشر فبراير 12 كود ثان. يعمل ايه ما هو المطلوب لكى ننفذه انت واضع كود عايز تطبقه طيب ما تطبقه بسيطة تعلم تطبيق الكود أما إذا كان لك طلب تحتاج كود لتنفيذه كنت كتبته من الاول او افتح مشاركة جديدة بها طلبك تقبل احترامى رابط هذا التعليق شارك More sharing options...
2saad قام بنشر فبراير 12 الكاتب مشاركة قام بنشر فبراير 12 الكود ده أنا جايبه من موقع وعايز اطبقه بس أنا مش عارف اطبقه علي الملف يعني مش عايز يشتغل هو عبارة عن كود يخفي اوراق العمل ونضع ازرار ( كومنت بوتن ) في اليوزرم فورم بعدد اوراق العمل ليتم فتحها عن طريقه وشكرا لو عند حضرتك كود تاني بسيط سهل الفهم أكون شاكر لحضرتك رابط هذا التعليق شارك More sharing options...
أبومروان قام بنشر فبراير 17 مشاركة قام بنشر فبراير 17 HID_SH.rar 1 رابط هذا التعليق شارك More sharing options...
2saad قام بنشر فبراير 17 الكاتب مشاركة قام بنشر فبراير 17 شكرا جزيلا وبارك الله فيك 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان