Internet et Excel VBA
Coucou à vous tous.
Je pense que mon problème est bidon pour un pro du VBA mais je tourne en rond.
Il s'agit d'un problème relatif à l'ouverture d'une page internet sur excel.
J'aimerais ouvrir la page: http://www.boursorama.com/bourse/opcvm/risque_opcvm.phtml?symbole=MP-804308 sur excel.
afin de prendre des donées (alpha et beta)
Ce qui est subtil c'est que je dois ouvrir cette page pour plusieurs valeurs.
Bref, je veux juste savoir ce que je dois écrire puisque:
Call ConnectWeb("http://www.boursorama.com/bourse/opcvm/risque_opcvm.phtml?code=", "&CATEGORIE=0", isin)
ne me renvoie pas la page que je veux et je ne comprends pas pourquoi.
Merci à vous tous
SOSO
j'ai oublié le fichier.
Salut le forum
Sofia a écrit :J'ai oublié le fichier.
Et tu as aussi oublié de joindre la macro
Call ConnectWebMytå
Bonjour,
je pensais l'avoir mise.
Voilà le fichier complet. Merci par avance
Sofia
Salut le forum
Même principe que pour les autres valeurs
Set rg = FeuilReq.Cells.Find("Alpha", LookAt:=xlWhole)
If rg Is Nothing Then
Tableau_Résultats(Ligne_Tableau, "Y") = ""
Else
Tableau_Résultats(Ligne_Tableau, "Y") = rg.Offset(2)
End IfMytå
Je sais quoi coder afin de prendre les données sur la page internet.
Mon souci c'est l'ouverture de cette page internet.
Mon call n'ouvre pas la bonne page internet.
Je dois ouvrir la page:
http://www.boursorama.com/bourse/opcvm/risque_opcvm.phtml?symbole=MP-829643
pour plusieurs fonds.
Merci
Re le forum
Sans modifier la macro ConnectWeb
If Left(isin, 2) = "FR" Then
Call ConnectWeb("http://www.boursorama.com/bourse/opcvm/risque_opcvm.phtml?code=", "&CATEGORIE=0", isin)
ElseIf Left(isin, 2) = "MP" Then
Call ConnectWeb("http://www.boursorama.com/bourse/opcvm/risque_opcvm.phtml?symbole=", "", isin)
End IfMytå