Guru do Excel e Power BI

Prezados,
Tenho um arquivo Excel que abro através de um .Bat

Assim que ele abre, preciso de um VBA que atualize todas as Consultas, Salve e Feche o arquivo.

Atenção: preciso que feche somente este arquivo, se existir outros arquivos excel abertos, devem permanecer.

Estou com este Código, que não está funcionando:
Erro: Assim que ele abre, aparece a mensagem "Esta ação cancelará uma atualização de dados pendente. Continuar?"


Módulo 1: (Em: Geral - Atualiza)
Sub Atualiza ()
ActiveWorkbook.RefreshAll
End Sub

Esta pasta de Trabalho: (Em: Workbook - Open)
Private Sub Workbook_Open()
Módulo1.Atualiza
ActiveWorkbook.Save
ThisWorkbook.Save
Application.Quit
End Sub

Boa tarde!
Tente... Att

Prezado @alexandrevba, Obrigado pelo auxílio, porém não está funcionando de acordo, seguem imagens:

Módulo 1:


Esta Pasta de Trabalho:


Erro:

É porque está dando conflito com a atualização e as demais ações da macro.

Para resolver isso tem que desmarcar a opção habilitar atualização em segundo plano nas propriedades da conexão. Assim ele vai primeiro atualizar os dados e só depois prosseguirá as demais ações.