Deshabilitar todas las barras de herramientas, menús, etc. Dejando solo barra de titulo en excel
Es una pregunta exclusiva para Dante Amor
Hola
Me gustaría que al entrar en el libro apareciera éste con sólo la barra de título de excel, me refiero a la que aparece con el icono de excel y el texto "Microsoft Excel".
El resto de barras de herramientas, menús, barra de fórmula y también el displayGridlines, displayHeadings, DisplayWorkbooTabs, me gustaría deshabilitarlas y que no se visualizaran.
Querría hacerlo a base de código VBA.
1 respuesta
Esto va en los eventos de thisworkbook
Private Sub Workbook_Open()
'Por.Dante Amor
ExecuteExcel4Macro ("show.toolbar(""ribbon"",0)")
On Error Resume Next: Application.CommandBars("Cell").Enabled = False
Application.DisplayFullScreen = True
Application.CommandBars("Full Screen").Visible = False
Application.CommandBars("Worksheet Menu Bar").Enabled = False
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
With Application
.ShowStartupDialog = False
.DisplayFormulaBar = False
.DisplayStatusBar = False
.ShowWindowsInTaskbar = False
End With
'
'
UserForm3.Show
End Subs a l ud o s
Hola
Casi todo se ha resuelto con la macro, de antemano gracias.
Lo único que he cambiado es
"application.displayfullscreen = true" ' lo he cambiado a "false"
porque no querría el excel a pantalla completa.
1º Sin embargo cuando he desactivado lo de pantalla completa he visto que sigo viendo los títulos de columna: A B C D E F G H... deberían haberse deshabilitado con ".displayheadings = false" pero los sigo viendo.
2º También sigo viendo los números de filas (1 2 3 ...)
He añadido como te indicaba en la pregunta lo de eliminar la cuadricula con la línea
.displaygridlines = false
3º y sin embargo la cuadrícula sigue mostrándose en las columnas que ya están rellenadas con datos. ¿No debería no mostrarse la cuadrícula totalmente en todas las celdas de la hoja?
4º Por último cuando cierro y abro varias veces el archivo excel al final se me coloca una barra de herramientas llamada "contribute" ¿cómo la desactivo con vba?
Todo esto lo puedo ver que sucede porque no tengo el excel a pantalla completa.
Ya me cuentas
Un saludo
Las pruebas las estoy haciendo con excel 2007 y me funcionan.
Busca las funciones para 2003.
Hola
Antes de hacer una pregunta intento buscar una solución y me peleo con el código pero como estoy limitado porque soy novato no encuentro la solución correcta muchas veces o no la sé reconocer, todo sea dicho.
Ya busqué las funciones para 2003 pero no encuentro nada que sirva.
Un saludo
