maval
XLDnaute Barbatruc
Bonjour
Pour mettre mon userform en plein écran à l'ouverture je met ce code:
Je suis a la recherche d'un code pour revenir a un écran normal.
Je vous remercie de votre aide
Pour mettre mon userform en plein écran à l'ouverture je met ce code:
Code:
Private Sub UserForm_Activate()
With Me
.StartUpPosition = 3
.Width = Application.Width
.Height = Application.Height
.Left = 0
.Top = 0
End With
End Sub
Je suis a la recherche d'un code pour revenir a un écran normal.
Je vous remercie de votre aide