UTILIZA ESTAS INSTRUCCIONES
ExecuteExcel4Macro "show.toolbar(""Ribbon"",FALSE)"
With ActiveWindow
.DisplayHeadings = False
.DisplayGridlines = False
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = False
End With
With Application
.ScreenUpdating = True
.Calculation = xlCalculationAutomatic
.Iteration = True
.EnableEvents = True
.StatusBar = False
.WindowState = xlMaximized
End With
ESPERO TE SIRVA
SALUDOS