importation sous vba

importation sous vba - VB/VBA/VBS - Programmation

Marsh Posté le 02-01-2007 à 16:40:05    

Bjr,
 
Je suis débutant en VBA et je voulais savoir comment on peut récupérer les données (texte, tableau,...) d'une page internet sous vba.
 
Merci

Reply

Marsh Posté le 02-01-2007 à 16:40:05   

Reply

Marsh Posté le 02-01-2007 à 17:58:18    

un embryon de réponse sur http://forum.hardware.fr/hfr/Progr [...] 6426_1.htm
 
Sous VBA : Ajouter une référence à Microsoft Internet Controls et insérer le composant sur une UserForm
puis qqch comme


Sub Bouton1_QuandClic()
    UserForm1.WebBrowser1.Navigate "http://forum.hardware.fr/hfr/Programmation/VB-VBA-VBS/importation-sous-sujet_99812_1.htm"
    UserForm1.Show
End Sub


 
il restera à balayer la feuille pour récupérer les infos désirées
Sinon par exemple via le Macro Recorder on peut obtenir


Option Explicit
 
Sub Tst()
     
    Workbooks.Open Filename:="http://forum.hardware.fr/hfr/Programmation/VB-VBA-VBS/importation-sous-sujet_99812_1.htm"
    Range("B60:B63" ).Copy
    Windows(2).Activate
    Range("A1" ).Select
    ActiveSheet.Paste
     
    Columns("A:A" ).Select
    With Selection
        .HorizontalAlignment = xlLeft
        .VerticalAlignment = xlTop
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With
     
    Range("B1" ).Select
 
End Sub



Message édité par kiki29 le 03-01-2007 à 08:59:12
Reply

Sujets relatifs:

Leave a Replay

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