[EXCEL VBA] IF avec deux condition

Résolu
iliesss Messages postés 120 Statut Membre -  
iliesss Messages postés 120 Statut Membre -
Bonjour
SVP comment ajouter à ce code
Sub test()
If Range("b1").Value = Range("a1").Value + Range("a2").Value Then
Range("a1:a5").ClearContents
Else
MsgBox "Déséquilibre dans la pièce", vbOKOnly + vbQuestion, "ATTENTION"
End If
End Sub

Cette deuxième condition
Range("b2").Value = Range("a4").Value + Range("a5").Value
J'ai essayé avec AND mes ça marche pas.
Merci beaucoup

2 réponses

Mytå Messages postés 4246 Statut Contributeur 954
 
Salut le forum

If (Range("b1").Value = Range("a1").Value + Range("a2").Value) And (Range("b2").Value = Range("a4").Value + Range("a5").Value) Then

Mytå
0