Como inserir logs de eventos automáticos usando Excel VBA Timestamp

Timestamps são um ótimo recurso para identificar quando um evento ocorreu. O Microsoft Excel oferece a opção de adicionar carimbos de data/hora no formato dd: mm: aaaa hh: mm: ss. Principalmente, você precisa usar atalhos de teclado ou executar funções do Excel para adicionar os carimbos de data/hora, que é uma tarefa manual e sujeita a erros.

O editor de código Visual Basic do Excel vem em seu socorro, permitindo que você automatize toda a tarefa usando os scripts de registro de data e hora do VBA. Você também pode adicionar condições complexas para automatizar ainda mais a tarefa sem depender do operador de entrada de dados ou colaborador. Continue lendo para aprender alguns truques simples para usar o VBA para adicionar carimbos de data/hora no Excel.

1. Como adicionar timestamp VBA: Macro QAT

O código VBA a seguir permite que você execute a função de log de eventos sempre que desejar com um único clique na barra de ferramentas de acesso rápido do Excel ou QAT. É semelhante a executar uma macro VBA do Excel , portanto, você precisa salvar a planilha existente usando uma extensão de arquivo habilitada para macro após aplicar o código VBA:

• Clique com o botão direito do mouse na guia da planilha e clique em Exibir código no menu de contexto.
• Copie e cole este código VBA no editor de código e clique em Salvar .

Sub vba_timeStamp() Dim ts As Date With Selection .Value = Date + Time End With End Sub

• Salve a pasta de trabalho como um arquivo habilitado para macro.
• Agora, clique na guia Arquivo e escolha Opções no menu Arquivo.
• Clique em Barra de ferramentas de acesso rápido (QAT) e role a lista para encontrar Exibir macros .
• Adicione Visualizar Macros ao QAT e feche o menu Opções clicando em Ok .
• Agora, execute a macro do QAT quando precisar adicionar um carimbo de data/hora executando o código VBA.

Para automatizar totalmente a tarefa de criação de carimbo de data/hora, você pode usar os scripts VBA mencionados abaixo.

2. Como adicionar carimbo de data/hora VBA: quando a planilha é alterada

O código VBA a seguir adicionará um timestamp nas células da coluna B quando detectar alterações nas células correspondentes da coluna A :

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 1 And Target.Value <> "" Then Application.EnableEvents = False Target.Offset(0, 1) = Format(Now(), "dd-mm-yyyy hh:mm:ss") Application.EnableEvents = True End If End Sub

Siga as etapas mencionadas no primeiro método para abrir o editor de código VBA. Agora, clique duas vezes em Sheet1(Sheet1) no menu VBAProject (Book1) para ativar o controle de alterações da planilha.

O editor de código deve mostrar Worksheet no menu suspenso do lado esquerdo e SelectionChange no menu suspenso do lado direito. Agora você pode copiar e colar o código VBA acima. Depois de concluído, não se esqueça de salvar o arquivo como uma pasta de trabalho do Excel habilitada para macro.

Sempre que você executar esta macro, o Excel adicionará automaticamente um registro de data e hora na coluna B se você escrever algo na coluna A . Você também pode adicionar a Macro ao QAT seguindo as etapas mencionadas no método anterior para adicionar o script VBA.

Palavras Finais

Agora que você sabe como usar o editor de código VBA do Excel com os códigos de carimbo de data/hora VBA mencionados acima, pode começar a modificar sua pasta de trabalho do Excel para inserir carimbos de data/hora automaticamente quando quiser.

No entanto, quaisquer alterações feitas em sua planilha do Excel executando um código VBA não desaparecerão se você pressionar a tecla de atalho Desfazer. Portanto, faça cópias de backup antes de aplicar esses scripts VBA simples. O Excel VBA também pode executar outras funções interessantes, por exemplo, você pode usar o VBA para inserir linhas no Microsoft Excel.