VBA Remplacement de mots

[alain.raphael]

Bonjour à Tous,

Je voudrais tenter un code VBA qui remplace certains mots listés dans ce code... dans toute une feuille (s'ils sont présents) par d'autres.....

Exemple :

Gestion -> Gest
Parallèle -> Paral
etc...

En vous remerciant.

 

[natorp]

Bjr alain.raphael

Pourquoi ne pas utiliser le Ctrl+H ?

Cordialement, Gérard

 

[alain.raphael]

La feuille est remplacée régulièrement par d'autres données......du coup cela m'éviterait de refaire à chaque fois le Ctrl +H sur une liste de mots à remplacer (une trentaine), une fois listés dans le code VBA de la feuille

 

[natorp]

Re,

En enregistrant le Ctrl+H sous forme d'une macro que vous pourriez appeler à volonté ?

Cordialement, Gérard

 

[alain.raphael]

Oui en effet !!

Mais je préférerai coder les mots dans un seul code plutôt qu'enregistrer 30 ou 40 macros :

 

[natorp]

Avec cette macro :

Sub Remplace()
    Cells.Replace What:="Gestion", Replacement:="Gest", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
End Sub

Et vous faites un copier/coller des lignes en remplaçant une bonne fois pour toutes les mots concernés

Non ?

 

[alain.raphael]

Merci !! J'essaie de suite !