Bonjour,

Je dois, sous excel 2010, remplacer des mots par leurs abreviations.
J'utilise cette forme :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
str = Replace(str, "Direction Générale", "DG", 1, 1, vbTextCompare)
Le mot ou la phrase matché pouvant être n'importe où dans str.
Le problème vient du type de "régles d'abréviation" suivante :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
str = Replace(str, "Fonction", "Fonc°", 1, 1, vbTextCompare)
lorsque str = "Fonctionnel".

Evidemment, ca me remplace "Fonctionnel" par "Fonc°nel" ...
Je dois donc matché un mot uniquement en totalité.

Problème, un mot n'est pas forcement suivi d'un espace dans mon cas.
Il peut y avoir ",", "&", "/" et plein d'autre caractere joyeux.

Je me demandais s'il n'y avais pas une fonction qui me permettrai de ne pas matché les chaine suivi d'une lettre.
J'ai pensé aux regex, mais j'ai du mal a mettre le système en place.

Avez-vous un conseil ou une piste à me proposer s'il vous plaît ?
Merci beaucoup de votre lecture.

Cordialement.