Rapport de message :*
 

Re: Récupération de données sur le web

Titre du sujet : Re: Récupération de données sur le web
par fixsurfer le 02/11/2011 13:39:52

Bonjour Didier,

Merci beaucoup pour cette réponse rapide et qui semble effectivement totalement répondre à ma demande.

J'ai simplement 3 petites questions :      
      - Je peux bien sans problème ajouter des nouvelles séries (ie: lignes) à mon tableau ?? J'ai fait le test et cela semble marcher mais je voulais m'en assurer.
      
      - Autre question, si je souhaite ajouter des colonnes avant celle contenant les liens web, quelle est la ligne de code que je dois modifier ??  Est ce bien celles-ci :
With Sheets("www.mdf-xlpages.com")
  Lmax = .Cells(.Rows.Count, 6).End(xlUp).Row
  For L = 5 To Lmax
    Application.StatusBar = (L - 4) * 100 \ (Lmax - 4) & "%... " & .Cells(L, 2).Text
   'URL
    vUrl = .Cells(L, 6).Text



Les 6 (en rouge dans le code) étant le numéro de colonne (ici 6 pour F) ?? Il suffit par exemple de mettre 8 si je décale en colonne H mes liens web ?? Est ce bien ça ??

      - Idem, si j'ai bien compris, je dois également démarrer ma liste à la ligne 5, ou modifier la ligne de code suivante :
 With Sheets("www.mdf-xlpages.com")
    Lmax = .Cells(.Rows.Count, 6).End(xlUp).Row
    For L = 5 To Lmax
       Application.StatusBar = (L - 4) * 100 \ (Lmax - 4) & "%... " & .Cells(L, 2).Text
      'URL
Ici remplacer le 5 par le numéro de ma première ligne (les 4 sont-ils aussi à remplacer??) ?

En tout cas merci encore une fois, je ne pensais pas avoir une réponse aussi rapide.

Fx