Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
640to644
640to644
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ungültige Webabfrage

Forumthread: Ungültige Webabfrage

Ungültige Webabfrage
21.07.2005 07:35:42
Thomas
Hallo zusammen,
habe folgendes Problem:
Wenn ich mir die Inhalte eines bestimmten Links manuell über "Daten - externe Daten importieren - Neue Webabfrage" importieren lasse, klappt das einwandfrei.
Versuche ich allerdings genau den selben Link in einem (aufgezeichneten) VBA-Makro importieren zu lassen, bekomme ich die Fehlermeldung: "Ungültige Webabfrage".
Der Link überschreitet auch nicht 255 Zeichen.
Bin am Rande des Wahnsinns. Please help.
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ungültige Webabfrage
21.07.2005 08:32:05
Claus
Hi Thomas,
schick doch mal Deine Webabfrage, bzw. das Makro... Dann kann man vielleicht anhand des Makros sagen was schief läuft...
Gruss
Claus
AW: Ungültige Webabfrage
21.07.2005 08:37:38
Claus
Oder vergleiche Dein Makro mal mit folgendem Code:
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;X X X X X X" _
, Destination:=Range("A1"))
.Name = "X X X X X"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = False
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingAll
.WebTables = "1"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = True
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
Gruss
Claus
Anzeige
AW: Ungültige Webabfrage
22.07.2005 18:17:24
Thomas
Hallo Claus,
erstmal vielen Dank für Deine prompte Reaktion. Mein Code schaut auf den ersten Blick genauso aus wie Deiner. Ich schicke Dir mal meinen. Ich meine es hat was mit der Art und Weise der URL zu tun:
URL = "http://www.1-2-3.tv/index.php?id=115&tx_123tvlocalProgram_pi1[selectedID]=82994"

With ActiveSheet.QueryTables.Add(Connection:="URL;" & URL, Destination:=Range("A1"))
.Name = "test"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlEntirePage
.WebFormatting = xlWebFormattingNone
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=True
End With
Dank & Gruß Thomas
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige