Web-Abfrage beschleunigen

Forumthread: Web-Abfrage beschleunigen
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Web-Abfrage beschleunigen

25.09.2004 02:38:27

Hubert

Mein problem ist ich habe 100 webabfragen in meinem excel workbook, alle von ein und derselben seite (nur unterschiedliche unterseiten).
Jedesmal baut excel eine verbindung auf, liest die daten kopiert sie in die tabelle usw.
Ist es möglich dass die verbindung gar nicht erst unterbrochen wird, sondern einfach beibehalten wird?
Denn der status "verbindung aufbauen" braucht jeweils am meisten zeit, während das herunterladen der daten sehr flott geht.
MFG hubert

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Web-Abfrage beschleunigen

25.09.2004 03:17:02

aley
AW: Web-Abfrage beschleunigen

25.09.2004 17:29:13

Hubert

AW: Web-Abfrage beschleunigen

25.09.2004 03:17:02

aley

Bitte mal deine datei Uploaden !

AW: Web-Abfrage beschleunigen

25.09.2004 17:29:13

Hubert

das hilft nichts wenn ich es uploade.
die adressen hab ich in einem array abgespeichert.
die abfrage mache ich mit einer
while adresse(x)""
...(normale webabfrage mit excel)
With ActiveSheet.QueryTables.Add(Connection:=adresse(x), Destination _
:=Range("A1"))
.Name = "blabla"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlAllTables
.WebFormatting = xlWebFormattingNone
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.Refresh BackgroundQuery:=False
End With
x=x+1
wend
schleife eben bis ich alle adressen abgerufen habe.