2 réponses
Bonjour RussellD,
J'arrive surement un peut tard mais ca servira peut-être pour d'autres :
Une fois Excel ouvert, tu fais alt+F11, la tu arrives dans le "module VB d'excel."
Clique droit sur "ThisWorkbook"-> insertion -> userform.
Ensuite tu ajoutes 3 jolies petites cases (Textbox) et un bouton ok (CommandButton)
Ensuite clique droit sur ton boutton OK et colle le code suivant, qui reste a adapter suivant le nom des tes Textbox.
Private Sub CommandButton1_Click()
dim a,b,resultat as double
a=userform1.textbox1.value
b=userform1.textbox2.value
resultat=a*b
userform1.textbox3.value= resultat
End Sub
J'arrive surement un peut tard mais ca servira peut-être pour d'autres :
Une fois Excel ouvert, tu fais alt+F11, la tu arrives dans le "module VB d'excel."
Clique droit sur "ThisWorkbook"-> insertion -> userform.
Ensuite tu ajoutes 3 jolies petites cases (Textbox) et un bouton ok (CommandButton)
Ensuite clique droit sur ton boutton OK et colle le code suivant, qui reste a adapter suivant le nom des tes Textbox.
Private Sub CommandButton1_Click()
dim a,b,resultat as double
a=userform1.textbox1.value
b=userform1.textbox2.value
resultat=a*b
userform1.textbox3.value= resultat
End Sub