Copier / coller à l’aide d’une formule pour Macro exixtante

[jean de chez claude]

Bonjour le forum
A l’aide d’une formule que j’insérerai dans une macro existante je souhaiterais :

Copier la cellule « désignation » de la colonne E pour la coller dans la cellule en dessous de la cellule « Ref » qui lui correspond en colonne C, ceci pour chaque ref existantes.
J’ai joint le fichier d’origine pour essai.


Je vous souhaite un excellent dimanche, je suppose que si vous êtes comme moi derrière votre ordi, c’est que chez vous aussi le beau temps n’est pas de la partie.
@+

 

[pierrejean]

Re : Copier / coller à l’aide d’une formule pour Macro exixtante

bonjour jean de chez claude

A ajouter en fin de macro existante

For n = 1 To Range("C65536").End(xlUp).Row
If InStr(Range("C" & n), "Référence") <> 0 Then
  Range("C" & n + 1) = Range("E" & n)
End If
Next n

 

[jean de chez claude]

Re : Copier / coller à l’aide d’une formule pour Macro exixtante

Bonjour pierrejean
Ca fonctionne impecable en modifiant "Référence" par " " et For n = 1 par For n = 5
Bonne fin de week-end à tous.
@+

 

[pierrejean]

Re : Copier / coller à l’aide d’une formule pour Macro exixtante

RE

Curieux !!!

Mais si cela te convient ....