【VBA】ブックが開かれたらPowerQueryを起動し、保存して終了させる

正しく動かすための準備

• クエリと接続のプロパティより、「バックグラウンドで更新する」のチェックを外す

これだけ

標準モジュールへ記述。

query.vba

Private Sub Auto_Open()
    If Workbooks.Count > 1 Then
        ThisWorkbook.Close SaveChanges:=True
    Else
        ActiveWorkbook.RefreshAll
        ThisWorkbook.Save
'        MsgBox "保存完了"
        Application.Quit
    End If
End Sub

準備をお忘れなく。