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?
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins