Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1473 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  copier données de IE vers excel

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

copier données de IE vers excel

n°1962504
chico95
Posté le 03-02-2010 à 09:41:01  profilanswer
 

Bonjour a tous, je suis au boulot et j'ai un problème urgent...
 
Voila, j'aimerais copier les éléments de internet explorer et les copier dans excel...
Je récupère dans excel, des éléments d'une base de données, pour ça pas de soucis, or certains éléments ressortent en HTML et il me les faut en texte...
 
Le seul moyen que j'ai trouvé pour les convertir est d'enregistrer ces données dans un fichier .html , d'ouvrir ce fichier, et de copier-coller les données du fichier ouvert dans excel, et tout ceci via une macro VBA !!!
 
Pour le début pas de soucis, là ou je coince c'est au moment de copier-coller les données se trouvant sur IE jusqu'à excel... J'ai essayé les SendKeys, mais ils ne marchent pas !
 
HELP !!
 
voila mon code :
 

Code :
  1. intFic = FreeFile
  2. Open "C:\test.html" For Output As intFic
  3. Print #intFic, Sheets("efront_datasheet" ).Range("N" & row_datasheet)
  4. Close intFic
  5.                                        
  6. Dim ie As Object
  7. Set ie = CreateObject("InternetExplorer.application" )
  8. ie.Navigate ("C:\test.html" )
  9. ie.Visible = True
  10. 'Copy datas from ie
  11. Application.SendKeys "^a^c"
  12. ie.Quit
  13. Sheets(template).Select
  14. Range("F" & row_template + 8 & ":" & "J" & row_template + 10).Select
  15. Application.SendKeys "^v"


 
 
 
Ce que j'ai essayé pour copier les données ne fonctionne pas...
Merci !!

mood
Publicité
Posté le 03-02-2010 à 09:41:01  profilanswer
 

n°1967091
chico95
Posté le 18-02-2010 à 10:03:43  profilanswer
 

Petit up...merci !

n°1967412
otobox
Maison fondée en 2005
Posté le 19-02-2010 à 00:24:30  profilanswer
 

Je n'ai pas trop de solution à t'apporter, mais en lisant ton code pour rapatrier les données de IE vers Excel, je me dis que tu ne suis pas le bon chemin en faisant un copier-coller.
Il y a des procédures pour télécharger des données sur internet vers Excel :
http://excel.developpez.com/faq/?p [...] sTableHtml
ou directement sur le site de Microsoft :
http://msdn.microsoft.com/fr-fr/li [...] 11%29.aspx
 
Je complète mon message avec le code trouvé sur la page de microsoft et qui fonctionne très bien chez moi :

Sub URL_Static_Query()
 
 With ActiveSheet.QueryTables.Add(Connection:= _
 "URL;http://forum.hardware.fr/hfr/Programmation/VB-VBA-VBS/copier-donnees-excel-sujet_127424_1.htm#bas", _
 Destination:=Range("a1" ))
 
 .BackgroundQuery = True
 .TablesOnlyFromHTML = True
 .Refresh BackgroundQuery:=False
 .SaveData = True
 End With
End Sub


 
Bon courage :)


Message édité par otobox le 19-02-2010 à 00:33:46

---------------
OtObOxBlOg - - - Etre seul à avoir tort  c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons
n°1967478
chico95
Posté le 19-02-2010 à 10:20:00  profilanswer
 

Merci beaucoup...je vais essayer !
 
Mais j'ai peut être trouvé une autre solution :
 
En faite il me manque les balises <html><body></body></html> pour que excel puisse le lire directement sans passer par IE !


Message édité par chico95 le 19-02-2010 à 10:20:49

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  copier données de IE vers excel

 

Sujets relatifs
Probleme incompatibilité excel 2010Script pour recuperer des données dans une page .htm
Rendre un diapo cliquable vers un lienJe n'arrive pas à le faire avec Excel seul.
Graphe sur excelAccess vers excel
Applet vers salon IRCTUTO/COURS apprendre excel/vba
validation modele conceptuel de données 
Plus de sujets relatifs à : copier données de IE vers excel


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR