XL 2010 Formule VBA pour remplacer un mot

zizou026 · 22 Janvier 2021

Bonjour,
Je cherche une formule VBA pour chercher les mots de la colonne L et le remplacer dans la colonne C.
Exemple : Si on trouve "Pomme" remplacer par "Fruit" dans la colonne C.
Si L "Raisin" Remplacer par "Fruit"
Si L "Haricot" Remplacer par "Légume"

Mots.xlsx

Le service des pièces jointes, CJoint.com est un service de partage de fichier gratuit pour partager vos documents dans vos courriels, sur les forums ou dans vos petites annonces.

www.cjoint.com

Par avance, je vous remercie de votre aide.
Cordialement,
Zizou026

sylvanu · 22 Janvier 2021

Bonjour Zizou,
Ce que vous demandez est impossible si on ne dispose pas d'une liste de correspondance : Pommes -> Fruit, Haricot -> Légume ....
On peut remplacer les deux exemples que vous avez donné mais pour le reste ?
Si on trouve Citron, Rutabaga, Letchi, Salsifis, Goyave, Carambole ..... comment savoir comment les catalogués ?

zizou026 · 27 Janvier 2021

Bonsoir sylvanu,
Merci pour votre réponse, faut-il créer une liste? La liste pourrait être dans un classeur fermé? Et, peut-on le faire évoluer? Excellente soirée.

sylvanu · 27 Janvier 2021

Bonsoir,
Le VBA n'est pas très futé. Il lui faut d'une façon ou d'une autre qu'il sache qu'une carotte est un légume et qu'un citron un fruit.
Mettre la liste dans un fichier fermé va ralentir la recherche, si c'est possible dans le fichier même serait beaucoup plus simple. La liste peut être cachée et ne pas être accessible simplement à l'utilisateur.

Un exemple en PJ avec :

VB:

=RECHERCHEV(L2;Liste;2)

La liste est dans la feuille cachée Liste.

XL 2010 Formule VBA pour remplacer un mot

zizou026

XLDnaute Nouveau

Mots.xlsx

Pièces jointes

sylvanu

XLDnaute Barbatruc

zizou026

XLDnaute Nouveau

sylvanu

XLDnaute Barbatruc

Pièces jointes

Discussions similaires