'
Application.CommandBars("Standard").Visible = false
Application.CommandBars("Formatting").Visible = false
Application.CommandBars("Stop Recording").Visible = false
Application.CommandBars("Drawing").Visible = false
Application.CommandBars("EuroValue").Visible = false
With ActiveWindow
.DisplayHeadings = false
.DisplayWorkbookTabs = false
End With
Application.DisplayFormulaBar = false