Como adicionar automaticamente a data e a hora a um comentário no Excel?
Quando insere um comentário numa célula, o Excel adiciona automaticamente o seu Nome de Utilizador por predefinição. Já alguma vez se perguntou se é possível incluir também a Data e Hora Atuais automaticamente no comentário? Isso permitir-lhe-ia identificar rapidamente o momento exato em que criou cada comentário. Neste artigo, revelo-lhe alguns truques práticos para resolver este desafio no Excel.
Adicionar manualmente data e hora ao comentário com atalhos de teclado
Adicionar automaticamente data e hora ao comentário com código VBA
Adicionar manualmente data e hora ao comentário com atalhos de teclado
Sem precisar de digitar a data e a hora na caixa de comentários, pode usar estes atalhos de teclado para inseri-las rápida e facilmente. Siga estes passos:
1. Clique numa célula onde pretende inserir um comentário com a data e hora atuais, clique com o botão direito do rato e escolha Inserir Comentário no menu de contexto, conforme ilustrado:
2. Após inserir o comentário na caixa de comentários, prima Ctrl + ; para inserir a data atual, pressione a barra de espaço e, em seguida, prima Ctrl + Shift + ; para inserir a hora atual. Assim, a data e a hora atuais são adicionadas imediatamente ao comentário, conforme ilustrado:
3. Depois, pode editar o seu comentário conforme necessário.
Adicionar automaticamente data e hora ao comentário com código VBA
Se não estiver familiarizado com os atalhos de teclado, não se preocupe — aqui explicamos um código VBA que insere automaticamente a data e a hora por si.
1. Selecione a célula onde pretende inserir o comentário.
2. Mantenha premidas as teclas ALT + F11 para abrir a janela Microsoft Visual Basic para Aplicações.
3. 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 comentário
Sub DatedComment()
'Update 20141110
Dim pComment As Comment
Dim WorkRng As Range
Set WorkRng = Application.ActiveCell
Set pComment = WorkRng.AddComment(Application.UserName & ":" & vbLf & Now & vbLf)
pComment.Shape.TextFrame.Characters(1, VBA.Len(Application.UserName) + 1).Font.Bold = True
End Sub
4. Em seguida, prima a tecla F5 para executar este código. Será inserido automaticamente um comentário na célula selecionada com a data e a hora atuais, que poderá editar conforme necessário, conforme ilustrado:
Dica: Este código VBA não funciona se a célula selecionada já tiver um comentário inserido anteriormente.
Artigos relacionados:
Como repor todas as posições dos comentários no Excel?
Como realçar todos os comentários no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos