Rempacement du ";" en vba dans une formule

[jarbrok]

Bonsoir à tous,

voilà mon problème:

je voudrais remplacer "9;4;1);" par "1;4;1);" dans la formule de plusieurs cellules. Cela marche très bien si je passe par CTRL+H dans excel.
Je voudrais automatisé le processus en VBA, j'ai donc enregistrer une macro qui donne ceci:

Selection.Replace What:="9;4;1);", Replacement:="1;4;1);"

Malheureusement quand j'exécute cette macro sur une sélection rien ne se passe.
J'ai essayé avec d'autres chaines de caractères et ça marche sauf si elle contient un ";".

Avez-vous une idée?

Merci

 

[mth]

Re : Rempacement du ";" en vba dans une formule

Bonsoir jarbrok

Chez moi ton code fonctionne correctement, il y a peut-être un problème ailleurs?
Pour le savoir il serait utile d'avoir le code en entier, voire un extrait de ton fichier pour tester.

Bien à toi,

mth

Edit: Bise Kjin 🙂

 

[kjin]

Re : Rempacement du ";" en vba dans une formule

Bonsoir, coucou Mireille 🙂,
Essaies

Range("A1").FormulaLocal = Replace(Range("A1").FormulaLocal, "9;4;1);", "1;4;1);")

edit : ou bien

Range("A1").Formula = Replace(Range("A1").Formula, "9,4,1),", "1,4,1),")

A+
kjin