Rendre une partie d'une phrase : "variable&qu

voldo2142 -  
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
Bonjour,

Je sais pas si c'est fesable sur excel...

En gros mon fichier download directement de yahoo des cours boursier. Simplement dans mon code VBA, j'ai directement écrit le lien des adresses internet tel que :

Workbooks.Open Filename:= _
"http://ichart.finance.yahoo.com/table.csv?s=MSFT&a=02&b=13&c=1986&d=01&e=15&f=2008&g=m&ignore=.csv"
ActiveWindow.Visible = False
Windows("table.csv").Visible = True

Dans ce cas l'action en question est Microsoft (MSFT). Le top serait que MSFT soit une variable que je pourrais choisir dans la cellule A1.

Auriez vous des idées a proposer???

Merciiii
nmartin

2 réponses

Utilisateur anonyme
 
Tiens, je te fais un cadeau

http://cjoint.com/confirm.php?cjoint=cBcsVylfGW
0
voldo2142
 
Merci beaucoup,

Mais est ce qu'il y aurait une facon de le faire à travers vba comme je le souhaite??? c'est possible?

j'ai essayé ca :

Workbooks.Open Filename:= _
"http://ichart.finance.yahoo.com/table.csv?s=& range("b4").value & "& "&a=02&b=13&c=1986&d=01&e=15&f=2008&g=m&ignore=.csv"
ActiveWindow.Visible = False
Windows("table.csv").Visible = True

mais ca ne marche pas....

help help
0
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
Bonjour,

il faut bien mettre tes " "
Sub test()
Dim fich As String
fich = "http://ichart.finance.yahoo.com/table.csv?s=" & [A1].Value & "&a=02&b=13&c=1986&d=01&e=15&f=2008&g­=m&ignore=.csv"
Workbooks.Open Filename:=fich
End Sub

eric
0