Re lien entre excel et internet

Ledaf · 26/08/2008, 10h05

Bonjour,

J'ai fait appel à vous hier pour le même sujet mais j'ai à nouveau un problème.

Code :

With ActiveSheet.QueryTables.Add(Connection:= _
        "URL;" & Cells(1, 1).Value _
        , Destination:=Range("D22"))

En fait j'aimerai coller mes données sur une seule feuille excel. Or vu que j'ai plusieurs lien, j'ai donc plusieurs données à copier.
Je voudrai les copier à la suite, c'est à dire au niveau de la destination (en rouge), j'aimerai qu'il recherche dans la colonne A la 1ère cellule qui est vide.
Est ce possible?

En vous remerciant

ouskel'n'or · 26/08/2008, 18h20

Le code suivant donne la dernière ligne renseignée de la colonne A de "feuil1"

Code :

DerLig = Worksheets("feuil1").Range("A" & Worksheets("feuil1").Columns(1).Rows.Count).End(xlUp).Row '+ 1 (*)

(*) Pour avoir le numéro de la première ligne vide de la feuille, tu valides + 1

26/08/2008, 10h05	#1 (permalink)
Ledaf Futur Membre du Club Date d'inscription: décembre 2007 Messages: 32	Re lien entre excel et internet Bonjour, J'ai fait appel à vous hier pour le même sujet mais j'ai à nouveau un problème. Code : With ActiveSheet.QueryTables.Add(Connection:= _ "URL;" & Cells(1, 1).Value _ , Destination:=Range("D22")) En fait j'aimerai coller mes données sur une seule feuille excel. Or vu que j'ai plusieurs lien, j'ai donc plusieurs données à copier. Je voudrai les copier à la suite, c'est à dire au niveau de la destination (en rouge), j'aimerai qu'il recherche dans la colonne A la 1ère cellule qui est vide. Est ce possible? En vous remerciant Dernière modification par fring ; 26/08/2008 à 10h08 Motif: Ajout des balises [code]

26/08/2008, 18h20	#2 (permalink)
ouskel'n'or Modérateur Date d'inscription: février 2005 Localisation: Une petite rue qui "avait" un merle Messages: 11 574	Le code suivant donne la dernière ligne renseignée de la colonne A de "feuil1" Code : DerLig = Worksheets("feuil1").Range("A" & Worksheets("feuil1").Columns(1).Rows.Count).End(xlUp).Row '+ 1 () () Pour avoir le numéro de la première ligne vide de la feuille, tu valides + 1 __________________ Je...ne...réponds...pas....aux...questions...techniques... par...mp La recherche (VBA-E) : Le Forum, La FAQ, Les cours et tutoriels, Contribuez, Les Sources et... l'Aide en ligne !!!

		Forum des développeurs > Hardware, Systèmes et Logiciels > Microsoft Office > Excel > VBA Excel
Re lien entre excel et internet

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email