J'ai trouvé des solutions sur le forum et j'en ai fait un condensé. Le code suivant met le Userform en plein écran et fait un zoom pour augmenter la taille des controles qu'il contient...
Private Sub UserForm_Activate()
Dim W As Double
With UserForm1
.StartUpPosition = 3
W = Application.UsableWidth / 768
Me.Zoom = CInt(W * 95)
.Width = Application.Width
.Height = Application.Height
.Left = 0
.Top = 0
End With
....
Les chiffres 768 et 95 sont à adapter suivant les résultats attendus et la taille de l'écran....