Bonjour et merci Steplof,
Ma boucle de lecture dans plage1 est de la forme :
For Each c In Range("plage1")
ligne=ligne+1
If c.Value = 10 Then a = Range("PLAGE2").Item(ligne).Value
Next c
j'ai mis 10 comme valeur recherchée dans plage1 (pour l'exemple)
Je récupère bien la valeur dans la plage2
encore une fois merci