Bonjour,

Suite à boucle sur des critères allant de la ligne 2 à 9, je voudrais récupérer le numéro de ligne dans une autre feuille de critère en critère

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub essai()
Dim l As Long, k as Variant 
Dim MaPlage3 As Range, MaPlage4 As Range
Dim Ws3 As Worksheet, Ws4 As Worksheet
Set Ws3 = ThisWorkbook.Worksheets("BDD")
Set Ws4 = ThisWorkbook.Worksheets("X")
Set MaPlage3 = Ws3.Range("AR2:AR9")
Set MaPlage4 = Ws4.Range("AD1:AD10000")
 
                        For Each k In MaPlage3
                        On Error Resume Next
                        l = Application.Match(k, MaPlage4, 0)
                        MsgBox l &" "& k
                        Next k
 
Set Ws3 = Nothing
Set Ws4 = Nothing
Set MaPlage3 = Nothing
Set MaPlage4 = Nothing
End Sub
La première boucle fonctionne sur le premier critère et me restitue bien le numéro de ligne de la feuille "X" (variable l)
Mais dès que je passe au deuxième critère, il reste sur le premier numéro de ligne et la boucle fonctionne bien puisque que chaque msgbox restitue la valeur k

Je pensais qu'une variable se réinitialisait???