chercher remplacer

[buromania]

Bsr et bonne année à tous

sur feuil1 en col A j'ai les codes produits et en col C les prix
sur feuil2 en col A j'ai les codes produits et en col E les prix
Je cherche à récuperer les prix de la feuil1 dans la feuil2
j'ai recupere la procédure de Galopin mais n'arrive pas à insérer Offset(0, 5)

For Each o In Range('A1:A30000')
A= o.Value
B= 😵ffset(0, 3).Value
Feuil1.Cells.Replace What:=A, Replacement:=B, MatchCase:=True
Next o
en espérant avoir été clair
bonne soirée à tous

 

[porcinet82]

Salut buromania,

Je ne sais pas si je vais répondre a ta question, mais le offset sert a te decaler dans une feuille a partir d'une cellule,

.Offset(ligne,colonne).select

Exemple:
Selection.Offset(1,0).select
'Te décale d'une cellule vers le bas
Selection.Offset(1,1).select
'Te décale d'une cellule vers le bas et vers la droite la droite
Selection.Offset(0,-1).select
'Te décale d'une cellule vers la gauche

@+

 

[buromania]

bjr porcinet, le forum
j'ai résolu mon problème en écrasant mes anciens prix en les remplaçant par des codes produits et par la procédure de galopin
merci et bonne soirée à tous