Sujet Précédent Sujet Suivant

Rechercher remplacer une partie d'une formule en VBA

Résolu/Fermé
Mist59 Messages postés 2 Date d'inscription dimanche 27 mars 2016 Statut Membre Dernière intervention 28 mars 2016 - 27 mars 2016 à 15:36
Mist59 Messages postés 2 Date d'inscription dimanche 27 mars 2016 Statut Membre Dernière intervention 28 mars 2016 - 28 mars 2016 à 13:01
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
A voir également:

2 réponses

Réponse 1 / 2
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 525
28 mars 2016 à 09:29
Bonjour,

Essaie : 
Columns("AO:AO").Replace What:="SUBTOTAL(9", Replacement:="SUBTOTAL(3", _
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:= _
False, ReplaceFormat:=False


A+
0
Réponse 2 / 2
Mist59 Messages postés 2 Date d'inscription dimanche 27 mars 2016 Statut Membre Dernière intervention 28 mars 2016
Modifié par Mist59 le 28/03/2016 à 13:05
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
0

Discussions similaires

recherche à partir de la barre d'adresse
Sylviane -
Lulin -

Bonjour,

Avant, je pouvais faire une recherche sur internet directement dans la barre d'adresse. J'ai dû désactiver quelque chose sans le vouloir. Aujourd'hui si je saisis un mot pour rechercher,je n'obtiens que cette réponse :
http:///?%20j
Quelqu'un peut-il m'aider ?
Merci

11 réponses
"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

Bonjour,
Nous avons un problème dans la programmation de notre VBA. Voici notre programme:

Sub Bloucle1Bull()
Dim a, k As Integer

k = 2
Do While Worksheets("formulaire").Cells(2, 2) Worksheets("formulaire").Cells(k, 4)
k = k + 1
Loop


a = 2
Do While Worksheets("formulaire").Cells(k + 1, 4) Worksheets("BDD Call").Cells(a, 1) Or (Worksheets("BDD Call").Cells(a, 4) = (Worksheets("Bullspread").Cells(2, 3) + 100)) Or Worksheets("BDD Call").Cells(a, 7) Worksheets("bullspread").Cells(2, 7)
a = a + 1
Loop

''''''''''''on recopie la ligne du premier call trouvé pour le jour 2 ...

2 réponses