Private Sub UserForm_Initialize() TextBox2 = Clear End Sub Private Sub CommandButton1_Click() 'bouton OK Range("B10") = TextBox2.Value Sec_Larg.Hide End Sub Private Sub CommandButton2_Click() 'bouton annuler 'je voudrais insérer cette commande ici Sec_Larg.Hide End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question