Discussion :

[hgmorse]

Bonjour,

Je recherche un moyen de recuperer une partie d'une formule

par exemple

dans A1 j'ai la formule
=LIEN_HYPERTEXTE("P:\6- Qualité-Environnement-Lean\NC fournisseur\2017\FSBSerV/18.xlsx";"FSBSerV/18")

sous vba je récupère la formule et je veux la decouper

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
dim toto as string
toto = .range("A1").formulalocal
toto = mid(toto,18)

et la j'ai une incompatibilité de type

je me doute que le problème vient de la présence de " dans la formule mais je sais pas comment gérer cela

[Invité]

Bonjour,

Personnellement, ton code marche très bien sur mon poste, tu as bien déclaré un "With" avant d'écrire cette ligne ? :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

toto = .range("A1").formulalocal

[Philippe Tulliez]

Bonjour,
Pour rendre pérenne une application, il est préférable d'utiliser la propriété Formula en lieu et place de FormulaLocal.
En effet dans ce monde où tout bouge, il n'est pas acquit que la version linguistique d'excel utilisée aujourd'hui soit la même demain. Sans compter les échanges éventuels de classeur avec un correspondant ayant une toute autre version. Pensez-y

Pour connaître la syntaxe anglaise d'une formule écrite en français à lire Ecrire une formule dans Excel à l'aide d'une procédure VBA

[Menhir]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
dim toto as string
toto = .range("A1").formulalocal
toto = mid(toto,18)

et la j'ai une incompatibilité de type

Enlève le point devant le Range.