L Laurent50 Guest 3 Janvier 2006 #1 Bonjour et bonne année à tous. je suis bloqué sur une fonction if. voilà j'aurai besoin que les cellules p11 à p24 s'incrémentent de 1 si W2 = 1 et Ad2 = 2 j'ai essayé avec la ligne si dessous mais excel n'en veut pas. Comment faut il l'écrire pour eventuellement que ça marche? Si cela est possible. If Range('W2').Value = 1 And Range('AD2').Value = 2 Then Range('P1124').Value = Range ('P1124').Value + 1 End If sinon je vais etre obligé de mettre une macro assez lourde qui va devoir le faire pour chacune des lignes de P11 à P24. Merci pour votre aide. Laurent
Bonjour et bonne année à tous. je suis bloqué sur une fonction if. voilà j'aurai besoin que les cellules p11 à p24 s'incrémentent de 1 si W2 = 1 et Ad2 = 2 j'ai essayé avec la ligne si dessous mais excel n'en veut pas. Comment faut il l'écrire pour eventuellement que ça marche? Si cela est possible. If Range('W2').Value = 1 And Range('AD2').Value = 2 Then Range('P1124').Value = Range ('P1124').Value + 1 End If sinon je vais etre obligé de mettre une macro assez lourde qui va devoir le faire pour chacune des lignes de P11 à P24. Merci pour votre aide. Laurent
myDearFriend! XLDnaute Barbatruc 3 Janvier 2006 #2 Bonsoir Laurent50, Tu peux essayer : Dim C As Range ... ... If Range('W2').Value = 1 And Range('AD2').Value = 2 Then For Each C In Range('P11: P24') C.Value = C.Value + 1 Next C End If Cliquez pour agrandir... Passer par une boucle n'est pas forcément très lourd. Cordialement, Vote positif 0 Vote négatif
Bonsoir Laurent50, Tu peux essayer : Dim C As Range ... ... If Range('W2').Value = 1 And Range('AD2').Value = 2 Then For Each C In Range('P11: P24') C.Value = C.Value + 1 Next C End If Cliquez pour agrandir... Passer par une boucle n'est pas forcément très lourd. Cordialement,