Externe Daten Abfrage
27.02.2004 13:20:59
Lars
Habe eine externe Abfrage, die beim öffnen einer Arbeitsmappe eine Tabelle aktualisiert. Die normale Aktualisierungszeit kann ich unter Datenbereichseigenschaften einstellen, allerdings wird dann mein Makro nicht mit ausgeführt.
Wie kann ich Excel dazu bringenn alle 60 min die angegebene externe Abfrage durchzuführen inklusive meines Makros, das sich danach zuschaltet (beim öffnen des Excel sheets funktioniert es jedenfalls reibungslos !) ???
Nachfolgend der Code:
Diese Arbeitsmappe:
Private Sub Workbook_Open()
Call GetExchange
UserForm1.Show
End Sub
Modul1:
Public Sub GetExchange()
With Worksheets("#Wechselkurs#")
.Range("A1").QueryTable.Refresh False
Range("C7").Select
Selection.Replace What:="down", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End With
End Sub
Für hilfreiche Tips wäre ich dankbar !
Lars.