Microsoft Excel

Herbers Excel/VBA-Archiv

Datenabfrage von anderem PC prüfen | Herbers Excel-Forum


Betrifft: Datenabfrage von anderem PC prüfen von: Laund
Geschrieben am: 31.01.2012 13:20:10

Hallo

Kurze Frage... nirgendwo was gefunden...

Ich aktuallisiere eine Datenabfrage mit:

Range("A2").Select
Selection.QueryTable.Refresh BackgroundQuery:=False

Wenn keine Verbindung zum anderen PC besteht auf dem die Datenbank läuft dauert das ewig.
Kann man nicht abfragen ob die Datenquelle vorhanden ist??

Tausend Dank für Eure Hilfe!

  

Betrifft: AW: Datenabfrage von anderem PC prüfen von: Oberschlumpf
Geschrieben am: 31.01.2012 15:24:40

Hi #Name?

Ich weiß nicht, obs funktioniert, aber versuch mal (ungtestet):

'prüft, ob Datei erreichbar
If Dir("\\Hostname\Pfad\Datei") = "" Then Exit Sub

'erst jetzt deine Abfrage, die auch so funktionieren müsste
Range("A2").QueryTable.Refresh BackgroundQuery:=False
für die Platzhalter musst du natürlich die gültigen Werte eintragen

Hostname = Computername im Netzwerk
Pfad = wo ist die Datei gespeichert
Datei = wie heißt die Datei

Hilfts?

Ciao
Thorsten


Beiträge aus den Excel-Beispielen zum Thema "Datenabfrage von anderem PC prüfen"