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.

Leave a Comment

Regra e mensagem de validação de campo do Access 2010

Regra e mensagem de validação de campo do Access 2010

No Access, a Validação de Campo permite que o usuário valide a entrada de dados aplicando restrições desejadas sobre o campo, também facilita aos usuários mostrar o

Incorporar vídeo no Excel 2010

Incorporar vídeo no Excel 2010

O Excel 2010 permite que o usuário insira objetos, o que pode ser muito útil se você quiser incorporar objetos diferentes na planilha de dados, mas quando se trata de

Adicione equações matemáticas com o editor de equações do Word 2010

Adicione equações matemáticas com o editor de equações do Word 2010

Ao escrever um documento que aborda principalmente sinais e equações matemáticas, usar o recurso de equações integrado do Word 2010 seria de grande ajuda.

Encontre o comprimento dos caracteres no Excel 2010

Encontre o comprimento dos caracteres no Excel 2010

Com uma fórmula simples, você pode descobrir o comprimento dos caracteres em textos, frases e dados de tabelas instantaneamente. Através da função LEN do Excel, você pode

Outlook 2010: Habilitar a opção Cópia Oculta (CCO)

Outlook 2010: Habilitar a opção Cópia Oculta (CCO)

Se você deseja enviar um e-mail para alguém secretamente e não quer que os outros destinatários do e-mail saibam disso, então você mantém o endereço de e-mail dessa pessoa

Outlook 2010: Gerenciamento de Direitos de Informação

Outlook 2010: Gerenciamento de Direitos de Informação

O Gerenciamento de Direitos de Informação é um serviço gratuito da Microsoft que define permissões específicas para os seus e-mails enviados. Se você quiser que ninguém consiga

Arredondamento de cantos de formas no Visio 2010

Arredondamento de cantos de formas no Visio 2010

Se você precisar fazer um diagrama genérico no Visio 2010 que não se enquadre realmente em uma categoria de diagrama específica e que usará muitas formas diferentes, então

Enviar desenho do Visio como anexo de e-mail em formato PDF e XPS

Enviar desenho do Visio como anexo de e-mail em formato PDF e XPS

O Microsoft Visio 2010 possui um recurso inerente para enviar diagramas instantaneamente para o Outlook como anexo de e-mail. Portanto, agora você não precisa mais enviar diagramas manualmente.

Pesquisa do Office Word 2010: Painel de Navegação

Pesquisa do Office Word 2010: Painel de Navegação

O painel de navegação fica no lado esquerdo do documento e facilita a pesquisa em todo o documento. Mas esta barra não é

Recurso de transmissão do PowerPoint 2010

Recurso de transmissão do PowerPoint 2010

O Microsoft PowerPoint 2010 permite que você transmita sua apresentação pela Internet para visualização remota ou para visualizadores pela rede. Isso