VBA RefreshAll wird nicht ausgelöst
18.12.2022 01:56:41
captainkeksxx
ich stehe vor einem hoffentlich nur kleinen Problem.
Ich würde gerne meine PowerQuery Abfrage über VBA aktualisieren.
Versucht habe ich es mit:
ActiveWorkbook.RefreshAll
Dieser Befehl wird aber erst NACH allen Codes ausgeführt und nicht innerhalb eines Codeablaufes.Ich lege über eine Prozedur eine neue csv.Datei in einen Ordner, möchte dann die PowerQuery Abfrage aktualisieren und dann die letzte Zeile der PowerQuery-Tabelle ermitteln. Das liefert aber ein falsches Ergebnis, da "RefreshAll" viel zu spät ausgeführt wird.
Ich hab das auch getestet mit
ActiveWorkbook.RefreshAll
Application.Wait (Now + TimeValue("0:00:10"))
Auch mit:
ActiveWorkbook.RefreshAll
Application.CalculateUntilAsyncQueriesDone
Application.Wait (Now + TimeValue("0:00:10"))
Doch RefreshAll wird erst NACH den 10sek tatsächlich ausgelöst.Mein Code geht danach aber weiter und benötigt die neuen Zeilen (die aktuell solange der Code noch läuft, nicht existieren)
Gibt es andere Befehle oder kann ich ein VBA Code so pausieren, dass er dieses PQ_Update auslöst und dann weiter macht?
Tschaukakao
captainkeks