Rechercher remplacer une partie d'une formule en VBA Résolu/Fermé

Question

Bonjour, 
Je cherche le morceau de code qui me manque pour indiquer à ma macro que la partie à remplacer se situe à l'intérieur d'une formule dans une cellule. J'ai utilisé l'enregistreur de macro avec ctrl H dans lequel on peut choisir "formule" mais ce terme ne se traduit pas en VBA

    Columns("AO:AO").Select
    With Selection
        .Replace What:="SOUS.TOTAL(9", Replacement:="SOUS.TOTAL(3", _
        LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:= _
        False, ReplaceFormat:=False
    End With
Merci de votre aide

Gyrus · Answer

Bonjour,

Essaie :
Columns("AO:AO").Replace What:="SUBTOTAL(9", Replacement:="SUBTOTAL(3", _LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:= _False, ReplaceFormat:=False

A+

Mist59 · Answer

Bonjour Gyrus

Merci de ta réponse, mais ça ne marche pas mieux. J'ai déjà essayé.
En fait le code ne trouve pas la formule.
Si je transforme la formule en texte (sans le signe = ou en plaçant un ' devant le signe =) alors la macro s'applique mais évidemment ça ne me sert qu'à constater le phénomène. Je pense que l'instruction se réfère par défaut à du texte et ne comprend pas qu'il faut remplacer un élément de la formule.

Errare humanum est !!!

ça fonctionne parfaitement !!!

Merci beaucoup

Rechercher remplacer une partie d'une formule en VBA

2 réponses

Discussions similaires