اخى الكريم
ضع هذا الكود فى موديل
Sub Auto_Open()
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
With ActiveWindow
.DisplayHeadings = True
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = False
End With
Application.DisplayFormulaBar = True
End Sub