Makro Datencenterabfrage
11.10.2016 15:32:29
Lucas
Ich habe folgendes Problem:
Ich habe mehrere Blätter mit Tabellen die Daten aus einer Datenbank abgreifen.
Die Tabelle will ich per Makro aktualisieren.
via
ActiveWorkbook.Worksheets("Beispiel1").Activate
common.Beispiel_Standardproductprices ActiveSheet
ActiveWorkbook.Worksheets("Beispiel2").Activate
common.Beispiel_Standardproductprices ActiveSheet
Dies funktioniert jedoch nur bei den Datenblättern mit kleinen Tabellen!
Beispiel 1: (A6:N53)
Beispiel 2: (A6:C28231)
Die Datencenterabfrage bei Beispiel 1 läuft via Makro problemlos, bei Beispiel 2 erhalte ich jedoch folgenden Fehler "XSD Web Service returned no records".
Von Hand lässt sich die Datencenterabfrage auch problemlos durchführen innerhalb von ca.5 Sekunden!
Ich habe schon versucht eine Pause einzubauen
(Application.Wait Now + TimeSerial(0, 0, 10))
jedoch ohne Erfolg, der Fehler tritt weiterhin auf.
Gibt's es noch eine andere Möglichkeit?
Vielen dank schonmal und viele Grüße
Lucas