Daten von einer Webseite (mit Java?) in Excel einlesen
06.12.2024 13:04:09
ThomasPohlmann
eine Frage, die bestimmt schon häufiger gestellt wurde, aber ich habe im Forum leider keine Antwort gefunden.
Ich möchte Daten von einer Webseite in Excel laden. Das Macro, das ich dafür verwende, liefert mir aber längst nicht alle Daten. Vielleicht, weil die Webseite Java verwendet?
Ich bin eher Anfänger was VBA angeht. Es wäre super, wenn mir jemand sagen könnte, wie ich mein Macro anpassen muss, um die gewünschten Daten zu erhalten.
Webseite:
https://www.eurex.com/ex-en/markets/idx/dax/DAX-Options-139884
Gewünschte in Excel zu kopierende Daten:
Auf jeden Fall ganz unten die Zeile mit
"Volume: 3,484 OI adj: 187,046 Total Volume: 2,299 OI adj: 436,928"
aber auch die vielen Zeilen oben drüber wären interessant.
Meine Excel-Datei mit dem Macro findet ihr hier:
https://www.herber.de/bbs/user/174143.xlsm
Beziehungsweise hier das Macro noch mal in Text-Form:
Sub Webabfrage()
With Worksheets("Tabelle1").QueryTables.Add(Connection:= _
"URL;https://www.eurex.com/ex-en/markets/idx/dax/DAX-Options-139884", Destination:= _
Range("Tabelle1!$A$1"))
.Name = "Tabelle1"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = True
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlOverwriteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlEntirePage
.WebFormatting = xlWebFormattingNone
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
End Sub
Vielen Dank im Voraus.
Grüße
Thomas
Anzeige