Hallo zusammen,
ich mache regelmäßige Webabfragen über ein VBA-Skript mit den folgenden Befehlen:
URL = "URL;https://www.test.de"
With Worksheets("Datendownload").QueryTables.Add(Connection:=URL, Destination:=Range("Datendownload!A1"))
.Name = "test"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlEntirePage
.WebFormatting = xlWebFormattingNone
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = True
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
Nun kommt seit gestern ziemlich häufig der Fehler '1004', der ja ziemlich allgemein gehalten wird. Komischerweise gibt es keine Probleme, wenn ich die exakt gleiche URL über einen normalen Browser abrufe, so dass ich eine IP-Sperrung etc. seitens des Anbieters eigentlich ausschließen würde.
Seht Ihr evtl., woran der Fehler noch liegen könnte? Ich bin insb. deshalb ratlos, da die Abfrage sonst schon ein paar Wochen wunderbar geklappt hat.
Vielen Dank und viele Grüße,
bogomier