1
Abra un nuevo archivo de Visual Basic y comenzar una nueva rutina sub usando el siguiente código: Sub
RemoveToolbars ()
2
Definir . .
On Error Resume Volver
aplicación
DisplayFullScreen = True
CommandBars : ¿bajo qué condiciones, por ejemplo, cuando las barras de herramientas deben ser retirados y ( " pantalla completa ") . Visible = False
. CommandBars ( " ExampleToolbarItemName ") . CommandBars = True
. Habilitado ( " ExampleToolbarItemName2 ") . Enabled = True
Agregando "On Error Resume Back" obligará a la aplicación de reanudar de nuevo a su estado inicial sin modificar , en caso de encontrar algún error . Cambiar " ExampleToolbarItemName " y " ExampleToolbarItemName2 " a los nombres de los elementos de la barra que desea modificar , como "Editar " o "Formato ".
3
Cierre la sub - rutina con el siguiente código:
extremo con
On Error GoTo 0
End Sub