Christian98
Ensign
- Registriert
- März 2014
- Beiträge
- 226
Hallo,
ich bin schon seit mehreren Stunden auf der Suche, nach einer Möglichkeit, wie ich werte aus einer Webseitentabelle in meine Exceltabelle einfügen kann.
Das Ganze funktioniert leider nicht mit der "Aus dem Web" Funktion, da man sich vorher einloggen muss!
Den Login habe ich bereits, nun brauche ich eigentlich nur noch den Import der Daten.
Ich habe es mit folgendem Code probiert, aber das funktioniert so nicht.
ich bin schon seit mehreren Stunden auf der Suche, nach einer Möglichkeit, wie ich werte aus einer Webseitentabelle in meine Exceltabelle einfügen kann.
Das Ganze funktioniert leider nicht mit der "Aus dem Web" Funktion, da man sich vorher einloggen muss!
Den Login habe ich bereits, nun brauche ich eigentlich nur noch den Import der Daten.
Ich habe es mit folgendem Code probiert, aber das funktioniert so nicht.
Code:
Do: Loop Until IE.Busy = False
Do: Loop Until IE.Busy = False
'get the table based on the table’s id
Set ieDoc = IE.Document
Set ieTable = ieDoc.all.Item("iddertabelle")
'copy the tables html to the clipboard and paste to the table
If Not ieTable Is Nothing Then
Set clip = New DataObject
clip.SetText "" & ieTable.outerHTML & ""
clip.PutInClipboard
Tabelle1.Select
Tabelle1.Range("A1").Select
Tabelle1.PasteSpecial "Unicode Text"
End If