كود اخفاء اسطر معينة

[WAEL-2017]

1. شباب بدي مساعدة منكم اريد طريقة اخفاء اسطر معينة انا احددها من الورقة الاولى ومن ثم اخفى نفس الاسطر من الورقة الثانية والثالثة بكوود يا ريت المساعدة 
2. المطلوب بدي اكبس على رقم 1 يقوم بإخفاء اسطر من ورقة عمل يومي ومراكز يومي نفس الاسطر ورقم 2 يقوم باخفاء اسطر من ورقة عمل يومي ومراكر يومي وورقة عمل SAP
3. اي ربط كود الاخفاء الاسطر أكثر من ورقة عمل  بكبسة 
4.  
5. سندات الانتاج.xls

[خيماوي كووول]

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

اتوقع اخوي انك مش مفعل خاصية تمكين الماكرو ..

من خيارات .. مركز التوثيق .. اعدادات مركز التوثيق .. اعدادات الماكرو .. تمكين كافة وحدات الماكرو

[WAEL-2017]

السلام عليكم خاصية الماكرو مفعلة ولكن اريد ربط كبسة اخفاء 1 في ملف سندات الانتاج 

اخفاء الاسطر من رقم الى    رقم الورقة الاولى 

وربطها بالورقة الثانية مراكز يومي اخفاء الاسطر من رقم الى رقم 

 المطلوب اختصار    --    كبسة زر واحدة تربط اختفاء الاسطر  على أكثر من ورقة ،الورقة الاولة والثانية 

تــم بالفعل حذف المشاركة الأخرى المكررة .... انتبه من فضلك لهذا الأمر

[خيماوي كووول]

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

اتفضل اخوي العزيز ..

تم وضع زرين في صفحة SAP .. لاخفاء الصفوف في الورقة يومي .. ومركز يومي .. تم تغيير اسم الورقة

يفضل تغيير اسماء الورقة من اللغة العربية الى اللغة الانجليزية ..

Sub test1()
Worksheets("dayly").Rows("6:16").EntireRow.Hidden = False
Worksheets("Sday").Rows("6:16").EntireRow.Hidden = False
End Sub
Sub test2()
Worksheets("dayly").Rows("6:16").EntireRow.Hidden = True
Worksheets("Sday").Rows("6:16").EntireRow.Hidden = True
End Sub

سندات الانتاج.xls

[WAEL-2017]

شكرا لك يا صديقي وجزاك الله خيرا