Macro AUTOOPEN

30/01/2008 - 03:57 por Raúl | Informe spam
Buenas noches a todos,

Espero me puedan apoyar, quiero crear una macro que al abrir un archivo de
excel se ejecute inmediatamente para activar el modo de pantalla completa y
que desactive el comando opciones del menu herramientas, así como
deshabilitar las barras de herramientas incorporadas y la barra de menús,
alguien sabe como le indico a la macro que se ejecute al abrir el libro
donde la grabe, saludos a todos y gracias de antemano
 

Leer las respuestas

#1 Héctor Miguel
30/01/2008 - 21:54 | Informe spam
hola, Raúl !

... quiero crear una macro que al abrir un archivo... se ejecute inmediatamente para activar el modo de pantalla completa
y que desactive el comando opciones del menu herramientas, asi como deshabilitar las barras de herramientas incorporadas
y la barra de menus, alguien sabe como le indico a la macro que se ejecute al abrir el libro donde la grabe ...



op1: para que la presentacion afecte SOLO cuando el usuario este utilizando tu aplicacion (el libro entero)...
pega en el modulo de codigo del libro (ThisWorkbook) ==Private Sub Workbook_Activate()
AmpliarVista True
End Sub
Private Sub Workbook_Deactivate()
AmpliarVista False
End Sub
Private Sub AmpliarVista(ByVal Mostrar As Boolean)
With Application
.DisplayFullScreen = Mostrar: .DisplayScrollBars = Not Mostrar
.CommandBars.ActiveMenuBar.Enabled = Not Mostrar
End With
End Sub

op2: para que la afectacion sea unicamente en cierta hoja de tu libro...
en el modulo de codigo de esa determinada hoja ==Private Sub Worksheet_Activate()
Application.DisplayFullScreen = True
Application.CommandBars.ActiveMenuBar.Enabled = False
End Sub
Private Sub Worksheet_Deactivate()
Application.DisplayFullScreen = False
Application.CommandBars.ActiveMenuBar.Enabled = True
End Sub

-> los procedimientos anteriores ocultan (NO alguna, sino) todas las barras de menus (y comandos)
para hacer lo mismo PERO SOLO con algunas barras de menus y comandos...
habria que determinar cuales si, y cuales no (ademas pensar que hacer si hay alguna pesonalizada)
y... (sobre todo) cuidar de no echarle a perder al usuario en turno su arreglo personal de las barras <\°|°/>

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

Preguntas similares