Somme Inputbox
Cichancichan17
-
Cichancichan17 -
Cichancichan17 -
Bonjour,
Je voudrais savoir comment faire la somme de deux valeurs de InputbBox.
J'ai fait ça pour le moment:
Sub Réponse()
A=InputBox("Premier valeur?")
B=InputBox("Deuxième valeur?")
Continuer = True
i=1
Do While Continuer = True
C= InputbBox ("Quel est la somme de ces deux valeurs"?)
If c= Application.Sum(a,b) Then
Continuer = False
End if
Loop
End Sub
Je voudrais savoir comment faire la somme de deux valeurs de InputbBox.
J'ai fait ça pour le moment:
Sub Réponse()
A=InputBox("Premier valeur?")
B=InputBox("Deuxième valeur?")
Continuer = True
i=1
Do While Continuer = True
C= InputbBox ("Quel est la somme de ces deux valeurs"?)
If c= Application.Sum(a,b) Then
Continuer = False
End if
Loop
End Sub
A voir également:
- Somme Inputbox
- Somme si couleur - Guide
- Formule somme excel ligne - Guide
- Somme en anglais excel - Guide
- Erreur de somme de contrôle - Forum Logiciels
- Recherchev + somme plusieurs lignes - Forum Excel
1 réponse
yg_be
Messages postés
24281
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 585
bonjour, ton code fonctionne-t'il bien? as-tu une question?
merci d'utiliser les balises de code quand tu partages du code (utilise "basic" pour du VBA)
et veille à avoir une ligne
suggestion:
merci d'utiliser les balises de code quand tu partages du code (utilise "basic" pour du VBA)
et veille à avoir une ligne
option expliciten début de module.
suggestion:
option explicit
Sub Réponse()
dim A, B, C
A=InputBox("Premier valeur?")
B=InputBox("Deuxième valeur?")
Do
C= InputbBox ("Quel est la somme de ces deux valeurs"?)
Loop until C = A+B
End Sub
Je voudrais que le macro s'arrête quand c=a+b et que sur A1 il me donne le nombre d'éssaies.
J'ai essaye ton code mais il ne marce pas...