Event nach Refresh einer Connection
04.12.2021 15:41:52
Ralph
ich importiere über eine PowerQuery Daten in meine Exceldatei. Das klappt auch automatisch wunderbar. Was mir nun noch fehl ist ein Event, das ausgelöst wird, wenn die Aktualisierung abgeschlossen wurde. Mit dem Makrorekorder habe ich mal die Eigenschaften der Verbindung (Connection) aufgezeichnet. Das Event QueryTable.AfterRefresh funktioniert hier leider nicht.
Hat jemand eine Idee, oder gibt es hier kein Event?
With ActiveWorkbook.Connections("Abfrage - GV").OLEDBConnection
.BackgroundQuery = True
.CommandText = Array("SELECT * FROM [GV]")
.CommandType = xlCmdSql
.Connection = _
"OLEDB;Provider=Microsoft.Mashup.OleDb.1;Data Source=$Workbook$;Location=GV;Extended Properties="""""
.RefreshOnFileOpen = True
.RefreshPeriod = 1
.SavePassword = False
.SourceConnectionFile = ""
.SourceDataFile = ""
.ServerCredentialsMethod = xlCredentialsMethodIntegrated
.AlwaysUseConnectionFile = False
End With
With ActiveWorkbook.Connections("Abfrage - GV")
.Name = "Abfrage - GV"
.Description = "Verbindung mit der Abfrage 'GV' in der Arbeitsmappe."
End With