Access de Xavi

Resto Office => Excel => Mensaje iniciado por: xavi en Abril 01, 2020, 05:35:11 PM

Título: Esconder ventana Excel tras UserForm
Publicado por: xavi en Abril 01, 2020, 05:35:11 PM
Palabras clave: Excel, UserForm, ventana, esconder, ocultar
Autor: Xavi
Extraído de: Experiencia propia

Por exigencia de un cliente, la ventana de Excel no habría de visualizarse dejando únicamente el UserForm. Un truco para ello es ajustar la ventana al tamaño del UserForm (bueno, un poquito menos) y controlar el movimiento del formulario para mover la ventana detrás

Al abrir el Libro de Excel, forzar el estado de la ventana de Excel a normal. Evento Workbook_Open, por ejemplo.

ActiveWindow.WindowState = xlNormal

Después, en cada UserForm, para el evento Layout, redimensionamos la ventana

Private Sub UserForm_Layout()
    With ActiveWindow
        .Top = Me.Top + 5
        .Left = Me.Left + 10
        .Height = Me.Height - 30
        .Width = Me.Width - 30
    End With
End Sub