Userform VBA
Fermé
RussellD
Messages postés
57
Date d'inscription
jeudi 18 mars 2010
Statut
Membre
Dernière intervention
6 septembre 2010
-
6 avril 2010 à 13:46
Dudul71 - 6 août 2010 à 17:40
Dudul71 - 6 août 2010 à 17:40
A voir également:
- Userform VBA
- Vba récupérer valeur cellule ✓ - Forum VB / VBA
- Mkdir vba ✓ - Forum VB / VBA
- Excel compter cellule couleur sans vba - Guide
- Vba range avec variable ✓ - Forum VB / VBA
- Vba dépassement de capacité ✓ - Forum Excel
2 réponses
RussellD
Messages postés
57
Date d'inscription
jeudi 18 mars 2010
Statut
Membre
Dernière intervention
6 septembre 2010
7
6 avril 2010 à 17:25
6 avril 2010 à 17:25
Quelqu'un peut-il m'aider ^^?
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