Como salvar arquivo com data e hora no Excel?

Ao trabalharmos em uma pasta de trabalho, às vezes precisamos adicionar a data e hora atuais ao salvar o arquivo. Talvez você possa digitar a data e a hora após o nome do arquivo na caixa de diálogo Salvar Como, mas aqui posso lhe apresentar um truque fácil para lidar automaticamente com essa tarefa.

Salvar arquivo do Excel com data e hora usando código VBA

Salvar arquivo do Excel com data e hora usando código VBA

Além de digitar a data e hora manualmente, o seguinte código VBA pode ajudá-lo a adicionar automaticamente a data e hora atuais ao nome do arquivo. Por favor, siga os passos abaixo:

1. Pressione as teclas ALT + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o seguinte código na Janela do Módulo.

Código VBA: Adicionar automaticamente data e hora ao nome do arquivo

Sub filesave()
'Update 20141111
ActiveWorkbook.SaveAs ("C:\Users\dt\Desktop\my information\nov-kte-data " & Format(Now(), "DD-MMM-YYYY hh mm AMPM") & ".xlsx")
End Sub

3. Em seguida, pressione a tecla F5 para executar este código; a data e hora atuais serão adicionadas após o nome da sua pasta de trabalho ativa, veja a captura de tela:

Observação: No código acima, você precisa alterar o caminho e o nome do arquivo conforme necessário.

Artigos relacionados:

Como salvar arquivo do Excel com valor da célula?

Como mostrar o caminho do arquivo na barra de título ou na barra de ferramentas no Excel?