OVH Cloud OVH Cloud

récup formule

3 réponses
Avatar
mArcus
Bonjour à tous,

Petit pb : comment récupérer par macro la _formule_ contenue dans une
cellule ? Je ne veux PAS le résultat. Même en affichant les formules je
n'ai pas trouvé l'astuce...

Merci de votre aide

3 réponses

Avatar
Rai
Bonjour,

Une piste :
utiliser la propriété FormulaLocal.

Par exemple :
Sub formule()
msgbox Activecell.FormulaLocal
End Sub

Bon Dimanche

Rai

Bonjour à tous,

Petit pb : comment récupérer par macro la _formule_ contenue dans une
cellule ? Je ne veux PAS le résultat. Même en affichant les formules je
n'ai pas trouvé l'astuce...

Merci de votre aide


Avatar
mArcus
Merci et bonsoir Rai,

Cela fonctionne effectivement en affichage ds le msgbox.
J'aimerais récupérer cette valeur, lui retirer le signe = et affecter la référence
restante à une variable pour un traitement et réutilisation ultérieure.
Exemple :
Si en Z21 il y a Á2 ce qui m'intéresse c'est C12 comme texte.
Bien sûr la position de la cellule cible (Z21) est changeante mais facile à repérer
par un Chercher (Cells.Find).

Si tu as une idée, c'est volontiers.
***********************************************

Bonjour,

Une piste :
utiliser la propriété FormulaLocal.

Par exemple :
Sub formule()
msgbox Activecell.FormulaLocal
End Sub

Bon Dimanche

Rai


Bonjour à tous,

Petit pb : comment récupérer par macro la _formule_ contenue dans une
cellule ? Je ne veux PAS le résultat. Même en affichant les formules
je n'ai pas trouvé l'astuce...

Merci de votre aide




Avatar
Corona
Bojour mArcus,
Si tu est sûr que c'est une formule, il suffit d'utiliser la fonction
mid()
F = Mid(ActiveCell.FormulaLocal, 2)
F = Mid(Range("Z21").FormulaLocal, 2)
Philippe

"mArcus" a écrit dans le message de news:

Merci et bonsoir Rai,

Cela fonctionne effectivement en affichage ds le msgbox.
J'aimerais récupérer cette valeur, lui retirer le signe = et affecter la
référence restante à une variable pour un traitement et réutilisation
ultérieure.
Exemple :
Si en Z21 il y a Á2 ce qui m'intéresse c'est C12 comme texte.
Bien sûr la position de la cellule cible (Z21) est changeante mais facile
à repérer par un Chercher (Cells.Find).

Si tu as une idée, c'est volontiers.
***********************************************

Bonjour,

Une piste :
utiliser la propriété FormulaLocal.

Par exemple :
Sub formule()
msgbox Activecell.FormulaLocal
End Sub

Bon Dimanche

Rai


Bonjour à tous,

Petit pb : comment récupérer par macro la _formule_ contenue dans une
cellule ? Je ne veux PAS le résultat. Même en affichant les formules je
n'ai pas trouvé l'astuce...

Merci de votre aide