J'ai besoin d'une tite info

sur une feuille 1 dans une cellule j'ai une valeur
je dois verifier que cette valeur est dans une ligne d'une autre feuille


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
DerniereColonne = Worksheets("evt").Range("A5").End(xlToRight).Column
 
    For i = 1 To DerniereColonne ' derniere colonne de la feuille evt
        If Worksheets("CS").Range("B" & NbligneApr).Value = Worksheets("evt").Range(i & "6").Value Then
En faite mon ti pb c'est au niveau du

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range(i & "6").Value
Je cherche a faire varié mes colonne A , B, C etc a chaque boucle jusqu'a la derniere
vous pourriez m'aider ?
merci.