FULLSCREEN ???

hola Moises

.: como hago para que al activar

nuevamente el libro de excel (que esta minimizado en la barra de tareas de
windows) se active en modo de pantalla completa y no simplemente como
maximized o normal.
he intentado colocando el metodo Application.DisplayFullScreen = True en el
evento sheetactivate ,windowsactivate, windowresize de workbook y en
worksheet activate de la hoja activa pero no logro que se abra en fullscreen
(sin titulos). Como solucionaria esto ???

es raro que no te funcione en ninguno delos eventos mencionados:

a mi esto me funciona sin problemas:

Private Sub Workbook_Activate()
Application.DisplayFullScreen = True
End Sub
Private Sub Workbook_Deactivate()
Application.DisplayFullScreen = False
End Sub

supongo que habra algo mas en el archivo que no se ve desde aqui.

De todas formas prueba a copiarlo tal cual en el modulo ThisWorkbook
del libro y si sigue sin funcionarte supongo/espero que alguien te
podra ayudar

un saludo
Ivan

Gracias IVAN.
Lo he intentado de diferentes formas inclusive como tu me sugieres pero es
imposible lograr que se abra en pantalla completa. Por que???

Me alimento del conocimiento de todos


"Ivan" wrote:

hola Moises

..: como hago para que al activar
> nuevamente el libro de excel (que esta minimizado en la barra de tareas de
> windows) se active en modo de pantalla completa y no simplemente como
> maximized o normal.
> he intentado colocando el metodo Application.DisplayFullScreen = True en el
> evento sheetactivate ,windowsactivate, windowresize de workbook y en
> worksheet activate de la hoja activa pero no logro que se abra en fullscreen
> (sin titulos). Como solucionaria esto ???

es raro que no te funcione en ninguno delos eventos mencionados:

a mi esto me funciona sin problemas:

Private Sub Workbook_Activate()
Application.DisplayFullScreen = True
End Sub
Private Sub Workbook_Deactivate()
Application.DisplayFullScreen = False
End Sub

supongo que habra algo mas en el archivo que no se ve desde aqui.

De todas formas prueba a copiarlo tal cual en el modulo ThisWorkbook
del libro y si sigue sin funcionarte supongo/espero que alguien te
podra ayudar

un saludo
Ivan

hola Moises

Lo he intentado de diferentes formas inclusive como tu me sugieres pero es
imposible lograr que se abra en pantalla completa. Por que???

la verdad es que no sabria decirte, pero a la espera de alguien que
sepa por donde pueden ir los tiros, solo se me ocurre que tengas
protegida la ventana o similar.

Si fuera asi supongo que valdria con desproteger y volver a proteger
tras los cambios en la pantalla

bueno, como te digo no se por donde va el tema, pero espero que
alguien se anime a echarte un cable

un saludo
Ivan

Gracias de nuevo. Ivan
En realidad no tengo el libro protejido y por si cualquier otra cosa
intente hacer lo mismo con un libro en blanco donde solo tengo un cmmandbutton
y el di guiente codigo:

en hoja 1
Private Sub CommandButton1_Click()
Application.WindowState = xlMinimized
End Sub

y en thisworkbook
Private Sub Workbook_Activate()
Application.DisplayFullScreen = True
End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Application.DisplayFullScreen = True
End Sub

Private Sub Workbook_WindowActivate(ByVal Wn As Window)
Application.DisplayFullScreen = True
End Sub

Private Sub Workbook_WindowResize(ByVal Wn As Window)
Application.DisplayFullScreen = True
End Sub


y nada que ver... no funciona... ????

Me alimento del conocimiento de todos


"Ivan" wrote:

hola Moises

> Lo he intentado de diferentes formas inclusive como tu me sugieres pero es
> imposible lograr que se abra en pantalla completa. Por que???

la verdad es que no sabria decirte, pero a la espera de alguien que
sepa por donde pueden ir los tiros, solo se me ocurre que tengas
protegida la ventana o similar.

Si fuera asi supongo que valdria con desproteger y volver a proteger
tras los cambios en la pantalla

bueno, como te digo no se por donde va el tema, pero espero que
alguien se anime a echarte un cable

un saludo
Ivan

hola, moises !

1) cual es el objetivo principal de usar el modo de pantalla completa ?
- inhibir los controles de la ventana de la aplicacion ? (botones de minimizar, maximizar y cerrar)
- administrar tus propias barras de menus y herramientas ?
- evitar/prevenir que el usuario cierre tu libro ? (o la aplicacion ?) <= no te olvides que existen otros "atajos"

2) (hasta donde se) si la restauracion de la aplicacion es por codigo, el displayfullscreen DEBIERA mantenerse...
(a menos que) si la restauracion la hace el usuario (desde la barra de tareas de windows)... NO !!! :((
(ya que con el fullscreen, el usuario NO tiene manera de minimizar la aplicacion)

3) si es realmente necesario mantener el fullscreen desde un "regreso" desde la barra de tareas de windws...
op1: usar llamadas a algunas AP's de windows
-> puedes consultar al respecto en las siguientes conversaciones:
http://tinyurl.com/ynw3ff
http://tinyurl.com/yqq3lc
op2: prueba forzando a la aplicacion (excel) a "retener" los recursos que cede cuando esta minimizada
usando para la macro con la que minimizas el estado de su ventana algo +/- como lo siguiente:

Sub Minimizar_Excel()
With Application: .WindowState = xlMinimized
Do: DoEvents
Loop While .WindowState = xlMinimized
.DisplayFullScreen = True
End With
End Sub

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

__ la consulta original __

Estoy disenando un libro donde los menus se presentan con varios Commandbuttoms y no tengo ninguna barra de herramientas
el libro aparece como pantalla completa. (de esta manera hago invisibles los botones de cerrar, maximizar y minimizar)
por lo que coloque un commandbuton con el que puedo minimizar la aplicacion en cuyo codigo tengo en el metodo clic
Application.DisplayFullScreen = True
... como hago para que al activar nuevamente el libro de excel (que esta minimizado en la barra de tareas de windows)
se active en modo de pantalla completa y no simplemente como maximized o normal.
he intentado colocando el metodo Application.DisplayFullScreen = True en el evento sheetactivate, windowsactivate, windowresize
de workbook y en worksheet activate de la hoja activa pero no logro que se abra en fullscreen (sin titulos).
Como solucionaria esto ???