Requete web dynamique (VBA)

Requete web dynamique (VBA) - VB/VBA/VBS - Programmation

Marsh Posté le 01-02-2007 à 23:59:37    

Bonjour,
 
Après de nombreuses recherches, je ne parviens pas à résoudre un problème. C'est pourquoi je m'en remet à votre aide.
 
Voici mon code :
 

Code :
  1. Sub initial()
  3.     Dim tick As String
  4.    
  5.     tick = InputBox("Introduisez tick", "Tick" )
  6.    
  7.    
  8.         "URL;http://moneycentral.msn.com/detail/stock_quote?Symbol=[""QUOTE"",""Enter stock symbols separated by commas.""]", _
  9.         Destination:=Range("A1" ))
  10.         .BackgroundQuery = True
  11.         .TablesOnlyFromHTML = True
  12.         .Refresh BackgroundQuery:=False
  13.         .SaveData = True
  14.     End With
  15.  
  16. End Sub


 
Ce que je désirerais, c'est que "tick" qui est entré via l'inputbox soit la variable qui arrive à la fin de l'URL. On aurait donc ceci :
 

Code :
  1. http://moneycentral.msn.com/detail [...] l="ce que j'ai entré en tick"


 
La méthode ci-dessus ne me convient pas car je désire effectuer plusieurs opération du même genre mais je ne souhaiterais n'entrer tick qu'une seule fois.
 
Merci d'avance pour votre aide


Message édité par judge_red le 02-02-2007 à 00:02:28
Reply

Marsh Posté le 01-02-2007 à 23:59:37   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed