Hola a tod@s

Tengo un formulario con varios TextBox y un Label.

Tengo la siguiente instrucción para que dependiendo de la pantalla,

y su resolución, este formulario se expanda. Pero lo que no consigo,

porque no se como se hace, es que los TextBox y el label, se centre

automáticamente dentro del formulario.

Gracias anticipadamente por vuestra ayuda.

Private Sub UserForm_Initialize()

Me.Height = Application.Height

Me.Width = Application.Width

End Sub

Hola buenos días:

Esta código redistribuye los controles de un formulario en función del tamaño de la ventana de la aplicación.

'-----------------------------------

tcoe = Application.Height - Me.Height

lcoe = Application.Width - Me.Width

'------------------------------------

Me.Height = Application.Height

Me.Width = Application.Width

'------------------------------------

For Each Control In Controls

   Control.Top = Control.Top + tcoe / 2

   Control.Left = Control.Left + lcoe / 2

Next

'-------------------------------------[/CODE]

Espero que le sirva.

Saludos

Hola buenos días:

Esta código redistribuye los controles de un formulario en función del tamaño de la ventana de la aplicación.

'-----------------------------------

tcoe = Application.Height - Me.Height

lcoe = Application.Width - Me.Width

'------------------------------------

Me.Height = Application.Height

Me.Width = Application.Width

'------------------------------------

For Each Control In Controls

   Control.Top = Control.Top + tcoe / 2

   Control.Left = Control.Left + lcoe / 2

Next

'-------------------------------------[/CODE]

Espero que le sirva.

Saludos

Muchas gracias por tu tiempo, me sirve