Encontrei na internet tempos atrás um arquivo que mostra como atualizar um relógio automaticamente na planilha excel.

Porém tem um pequeno erro quando vou para fechar o arquivo ele pede para salvar, clico em OK, e a planilha volta a se abrir sozinha.

Seguem os passos:
em EstaPasta_de_trabalho tem o código:

Private Sub Workbook_Open()
    Call AutoCalcular
End Sub

e em Módulo1 tem:

Sub AutoCalcular()
    Application.OnTime Now + TimeValue("00:00:01"), "AutoCalcular", , True
    Calculate
End Sub

Alguém consegue me ajudar?
Obrigado