Bonjour Findrh,
Désolée pour cette réponse tardive, mais je n'ai pas eu beaucoup de temps en ce début de semaine...
Effectivement, dans ton exemple cela fonctionne bien.
Le soucis c'est que moi j'ai modifié dans ta macro SYCOMORE par MIEL.SYCOMORE pour essayer et je pense que c'est à cause de ça que ça ne fonctionne plus.
Voici ma modif :
Vpos1 = InStr(vcel, "SYCOMORE")
If Vpos1 > 0 Then
vtxt = Replace(vcel, "MIEL.SYCOMORE", vlib)
ActiveCell.Formula = vtxt
Car moi je dois avoir dans mes cellules :
- Sycomore > MEL.MIEL.SYCOMORE*651x214
- Macadam > MEL.GRIS*651x214
- Blanc > MEL.BLA*651x214
Merci
Cordialement
Coline