Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPrivate Sub Workbook_Open() 'Réduction de la fenêtre Excel et ouverture de l'userform With Application .WindowState = xlNormal .Height = 1 .Width = 1 .Top = 1 .Left = 1 End With Formulaire_Principal.Show vbModeless End Sub