Gute Gesundheit und viel Glück in 2010 an Alle,
ich bin neu im Forum. Ich hoffe mir kann einer helfen.
ich wollte wissen, ob VBA eine dynamische Webseite importieren kann. Die Struktur der Webseite ist immer gleich aufgebaut. Es handelt sich um die Seiten vom Sportwettanbieter "Betfair" http://soccer.betfair.com/ . Als Beispiel-Seite habe ich das Spiel "Kavala - Levadiakos" am Dienstag um 1545 Uhr ausgewählt. Zu finden unter dem folgenden Link.
uk.site.sports.betfair.com/bet…rand=betfair¤cy=EUR
Der Link ist folglich nur bis zum kommenden Dienstag bis ca. 1700 Uhr gültig. Danach gebe ich einen neuen Link.
Diese Webseite gibt die Quoten und das Wettvolumen an. Um zur Hauptseite des Spiels zu gelangen muss man sich durchhangeln zu den Dienstag In-Play Spielen. Aber denke nicht, dass das nötig sein wird. Es dreht sich alles um die Abfrage der Quoten und Wettvolumen. Es sind nur 5 Informationen, die ich brauche.
Habe eine Makro Aufzeichnung gemacht in der leider die Webseite statisch ist. Wie bekomme ich es hin, dass er mir das aktive Webfenster herausliest Um das Fenster aktiv zu halten müsste ich das Makro mit einer Tastenkombination aktivieren (das ist mit der Makroaufzeichnung kein Problem), oder
Hier die Aufzeichnung:
Freue mich über jedes konstruktive Feedback.
Gruß Ferenz
ich bin neu im Forum. Ich hoffe mir kann einer helfen.
ich wollte wissen, ob VBA eine dynamische Webseite importieren kann. Die Struktur der Webseite ist immer gleich aufgebaut. Es handelt sich um die Seiten vom Sportwettanbieter "Betfair" http://soccer.betfair.com/ . Als Beispiel-Seite habe ich das Spiel "Kavala - Levadiakos" am Dienstag um 1545 Uhr ausgewählt. Zu finden unter dem folgenden Link.
uk.site.sports.betfair.com/bet…rand=betfair¤cy=EUR
Der Link ist folglich nur bis zum kommenden Dienstag bis ca. 1700 Uhr gültig. Danach gebe ich einen neuen Link.
Diese Webseite gibt die Quoten und das Wettvolumen an. Um zur Hauptseite des Spiels zu gelangen muss man sich durchhangeln zu den Dienstag In-Play Spielen. Aber denke nicht, dass das nötig sein wird. Es dreht sich alles um die Abfrage der Quoten und Wettvolumen. Es sind nur 5 Informationen, die ich brauche.
Habe eine Makro Aufzeichnung gemacht in der leider die Webseite statisch ist. Wie bekomme ich es hin, dass er mir das aktive Webfenster herausliest Um das Fenster aktiv zu halten müsste ich das Makro mit einer Tastenkombination aktivieren (das ist mit der Makroaufzeichnung kein Problem), oder
Hier die Aufzeichnung:
Visual Basic-Quellcode
- Sub aktive_Webseite_Test1()
- '
- ' aktive_Webseite_Test1 Makro
- ' URL gültig bis Dienstag 2009.01.05 1700 Uhr
- With ActiveSheet.QueryTables.Add(Connection:= _
- "URL;http://uk.site.sports.betfair.com/betting/LoadRunnerInfoAction.do?marketId=101033461&selectionId=3143239&timeZone=CET&locale=de®ion=GBR&brand=betfair¤cy=EUR" _
- , Destination:=Range("$A$1"))
- .Name = _
- "LoadRunnerInfoAction.do?marketId=101033461&selectionId=3143239&timeZone=CET&locale=de®ion=GBR&brand=betfair¤cy=EUR"
- .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 = False
- .WebDisableRedirections = False
- .Refresh BackgroundQuery:=False
- End With
- End Sub
Freue mich über jedes konstruktive Feedback.
Gruß Ferenz