السلام عليكم و رحمة الله وبركاته كل عام وانتم بخير
اخي الفاضل
انت تعلم ان جميع اشرطة الأدوات مرتبطة بالإكسل نفسة وليست مرتبطة بالملفات المعمولة في الإكسل
لذلك يوجد حل آخر لتخطي هذه المشكلة التي تمر بها
وهو وضع امر اظهار اشرطة الأدوات في اللأمر التنفيذي قبل اغلاق ملف الإكسل
وهو
Private Sub Workbook_BeforeClose(Cancel As Boolean)
With Application
.DisplayFullScreen = False
.CommandBars("Worksheet Menu Bar").Enabled = True
.CommandBars("Standard").Visible = True
.CommandBars("Formatting").Visible = True
.CommandBars("Visual Basic").Visible = False
.CommandBars("Drawing").Visible = True
.DisplayFormulaBar = True
.DisplayStatusBar = True
End With
Sheets("sheet1").[AD1] = False
Sheets("sheet1").[AE1] = "ÅÎÝÇÁ ÇáÞæÇÆã æÃÔÑØÉ ÇáÃÏæÇÊ"
End Sub