اختفاء صفحات وأوراق عمل بدون سبب

[مالك الجن]

هذا الملف خاص ويحتوي علي صفحات عمل دائما كلما ادراجتها  تختفي . كيف يمكن استعادة هذه الملفات

الكتب.rar

[ياسر خليل أبو البراء]

أخي الكريم

أهلاً بك في المنتدى ونورت بين إخوانك العفاريت

يا جن يا جن ..

وضعت لك في حدث المصنف كود يقوم بإظهار أوراق العمل المخفية عند فتح المصنف

Private Sub Workbook_Open()
    Dim SH As Worksheet
    For Each SH In Worksheets
        SH.Visible = True
    Next SH
End Sub

شوف الملف المرفق

الكتب.rar