Trouver une valeur et afficher le nom corresp

lwd Messages postés 3 Statut Membre -  
lwd Messages postés 3 Statut Membre -
je veux parcourir une plage de cellules contenant des chiffres dans la feuille2. si je trouve la valeur 2 je copie le nom qui correspond à cette valeur dans la feuille1. et je continue juska la fin.

voici mon code:
Sub cherchl()

Sheets("feuil2").Activate

For Each c In Sheets("feuil2").Range("M2:M5")

If c.Value = "2" Then

Sheets("feui2").Range("B" & c).Activate

Selection.Copy

Sheets("feuil1").Activate

Range("B8").Select

Application.ActiveSheet.Paste

Application.CutCopyMode = False

End If
Next c

1 réponse

lwd Messages postés 3 Statut Membre
 
Merci de votre aide
0