Discussion :

[sebing]

Bonjour,

Je souhaite mettre à jour un tableau que j'ai en effectuant du scrapping.
Pour cela j'utilise une formule

Code :

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

=XPathOnUrl("https://fr.investing.com/equities/total-consensus-estimates";"/html/body/div[5]/section/div[8]/div[2]/div[1]/p[1]/text()[2]")

qui me ramène la valeur souhaitée.
Mais je ne veux pas que les valeurs s'actualisent à l'ouverture du fichier, je le veux par une action (bouton), donc je vais créer quelques lignes en VBA pour mettre à jour mon tableau.

Le problème c'est que j'ai une erreur

erreur de compilation attendu fin d'instruction

(https surligné)lorsque je tape

Code :

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

Cells(2, 2).FormulaR1C1 = "=XPathOnUrl("https://fr.investing.com/equities/total-consensus-estimates";"/html/body/div[5]/section/div[8]/div[2]/div[1]/p[1]/text()[2]")"

Pourriez vous m'aider à débloquer la situation.

Je vous en remercie par avance

Cordialement
Sébastien RABAUD

[Qwazerty]

Salut

Je pense qu'en mettant des doubles quotes ça devrait aller. Le but est de spécifier à VBA que les doubles quotes doublées ne marquent pas le début ou la fin d'un texte.

Code :

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

Cells(2, 2).Formula = "=XPathOnUrl(""https://fr.investing.com/equities/total-consensus-estimates"";""/html/body/div[5]/section/div[8]/div[2]/div[1]/p[1]/text()[2]"")"

++
Qwaz

[sebing]

Merci pour la réponse.
Ca fait trop longtemps que je n'avais touché au VBA et j'avais oublié

Bonne soirée
Seb