شيت تم اخفاءة و لم يظهر مرة اخرى

[أستيكا]

السادة عمالقة المنتدى الكرام

تحية طيبة و بعد

 

برجاء المساعدة فى المرفق حيث انى قمت باخفاء شيت داخل الملف المرفق عن طريق كود و لم اتمكن من اظهار الشيت مرة اخرى حتى بعد الغاء الكود

 

برجاء المساعدة

[سليم حاصبيا]

ارفع الملف للمعاينة

 

[omar elhosseini]

 

الاخ أستيكا

 

ضع هذا الكود في موديل ثم قم بتنفيذه

لاظهار اي ورقة مخفية

 

Sub Show_All_Sheets()
'
For x = 1 To Sheets.Count
    Sheets(x).Visible = xlSheetVisible
Next
'
End Sub