Boucle

bonjour,

j'ai fait une macro avec 3 options et je n'arrive pas a l'adapter pour l'appliquer

sur B2/C2 et E2

puis B3/C3 et E3

ainsi de suite juqu'a la derniere ligne de la feuille

With ActiveSheet
If Range("B1").Value = "a" And Range("C1").Value = "b" Then Range("E1").Value = "option 1"
If Range("B1").Value = "a" And Range("C1").Value = "c" Then Range("E1").Value = "option 2"
If Range("B1").Value = "b" And Range("C1").Value = "c" Then Range("E1").Value = "option 3"
 End With

en espérant être clair dans mon explication

cordialement

Bonsoir

Pas sur d'avoir compris

Sub a()
Dim Ligne As Long

   For Ligne = 1 To Range("B" & Rows.Count).End(xlUp).Row
     If Range("B" & Ligne) = "a" And Range("C" & Ligne) = "b" Then
       Range("E" & Ligne) = "option 1"
     ElseIf Range("B" & Ligne) = "a" And Range("C" & Ligne) = "c" Then
       Range("E" & Ligne) = "option 2"
     ElseIf Range("B" & Ligne) = "b" And Range("C" & Ligne) = "c" Then
       Range("E" & Ligne) = "option 3"
     End If
   Next Ligne

End Sub

tu as parfaitement compris Banzaï !

je vais voir avec Microsoft la possibilité de livrer un Banzaï avec le logiciel excel

merci pour tout