Private Sub CommandButton1_Click() 'bouton ActiveX sur une feuille
Load UserForm1 'load le module userform
UserForm1.Show 'affiche l' userform
Unload UserForm1 'ferme le userform
End Sub
Sub Test() 'dans un module standard
Load UserForm1 'load le module userform
UserForm1.Show 'affiche l' userform
Unload UserForm1 'ferme le userform
End Sub