Bonjour à tous,
désolé d'avance si ce post est un doublon... mais... j'aurais besoin d'un coup de main!
Voilà, j'essaye de mettre au point une macro qui executerai des conditions if/then multiples, le tout sur plusieurs lignes.
Je m'explique:
j'ai 5 lignes (nommées de A a E pour l'occasion) et le calcul des 3 dernières lignes dépends des relations entre les 2 premières.
Par exemple:
Si A>=B alors D=B
et Si A<B alors 2 solutions:
-Si A+C<=B alors D=A+C
-Si A+C>B alors D=B
Et il faudrait le faire pour toutes les lignes (12 lignes).
J'ai tenté un
Sub D()
Dim score As Integer, result As Integer
A = Range("E2").Value
B= Range("E2").Offset(1, 0).Value
C = Range("E2").Offset(2, 0).Value
If A >= B Then
result = B
Else
If A + C > B Then
result = B
End If
End If
Range("E5").Value = result
End Sub