Bonjour à tous,
J'ai un problème a priori tout simple, mais que je n'arrive pas à résoudre.
Voila, j'ai 3 textbox acceuillant chacun une somme (en €).
la condition est que, si la somme de la seconde et de la troisième est supérieure à la première, alors je met un message d'erreur.
j'ai donc écrit cela:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Dim X As string, b As string, c As string X = UserForm3.TextBox37.Value b = UserForm3.TextBox33.Value c = UserForm3.TextBox34.Value Feuil5.Unprotect (123) If TextBox37.Value = "" Then a = MsgBox("Veuillez saisir le montant de l'engagement.", vbExclamation) ElseIf (b + c) > X Then a = MsgBox("Les montants d'Escompte et de Dailly sont supérieurs au montant total de l'engagement.", vbExclamation) Else
Dois-je changer le format de mes variables, currency, simple...?
Merci par avance pour votre aide![]()
Partager