Autor Tema: Esconder ventana Excel tras UserForm  (Leído 3247 veces)

Desconectado xavi

  • Administrador
  • Habitual
  • *****
  • Mensajes: 220
Esconder ventana Excel tras UserForm
« en: Abril 01, 2020, 04: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.

Código: [Seleccionar]
ActiveWindow.WindowState = xlNormal
Después, en cada UserForm, para el evento Layout, redimensionamos la ventana

Código: [Seleccionar]
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

« Última modificación: Abril 20, 2020, 12:14:07 am por xavi »