Macro para ocultar barra de menú completa solo en un libro.
He intentado crear y/o buscar una macro en la que al abrir un libro oculte todas las barras de herramientas solo en este sin afectar a otros libros, ¿Pueden ayudarme?. Utilizo Office 2003.
2 Respuestas
Te comento que no se si te funcione esta macro, ya que yo tengo 2007.. prueba y me comentas que tal...
Sub Autoabrir()
' Corre la macro, esconder la barra de herramientas 3 segundo desde ahora.
Application. OnTime Now + TimeValue("00:00:03"), "HideToolbars"
End Sub
Sub HideToolbars()
Dim Tbar as Object
' oculta toda las barras en Microsoft Excel
For Each Tbar in Toolbars
Tbar.Visible = false
Next
End Sub
Para mi mala suerte no funciono.
Pero encontré esta que me oculta la mayoría de las barras que mas se utilizan y las vuelve a activar al cerrar el libro:
Private Sub Workbook_Open()
Application.CommandBars("Worksheet Menu Bar").Enabled = False
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
Application.CommandBars("Visual Basic").Visible = False
Application.CommandBars("Reviewing").Visible = False
Application.CommandBars("Drawing").Visible = False
Application.CommandBars("Formula Auditing").Visible = False
Application.CommandBars("Formatting").Visible = False
Application.CommandBars("Standard").Visible = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Worksheet Menu Bar").Enabled = True
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Formatting").Visible = True
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Formatting").Visible = True
Application.CommandBars("Formula Auditing").Visible = True
Application.CommandBars("Drawing").Visible = True
Application.CommandBars("Reviewing").Visible = True
Application.CommandBars("Visual Basic").Visible = True
End Sub
Lo malo de esta es que cuando abierto otro libro a la par lo afecta tambien y no muestra las barras de herramientas de este, yo quiero que solo afecte un solo libro en especifico y no todos los que se abran al mismo tiempo, pero bueno.
Muchas gracias por tu ayuda y tu tiempo.