[EXCEL VBA] IF avec deux condition

Résolu
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

  1. Contributeur
    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