Como inserir automaticamente a data e hora atuais numa célula ao dar um duplo clique no Excel?
Introduzir frequentemente a data atual ou a data e hora em células do Excel pode tornar-se uma tarefa repetitiva, especialmente ao compilar registos, acompanhar o progresso ou gerir horários. Digitar manualmente a data de cada vez não só consome tempo, como também está sujeito a erros. Este artigo apresenta uma solução eficaz para este desafio: basta um simples duplo clique para inserir automaticamente a data atual ou a data e hora em qualquer célula dentro de um intervalo predefinido da sua folha de cálculo. Ao aplicar as soluções abaixo, agilizará o seu fluxo de trabalho e garantirá consistência na introdução de dados.
Duplo clique para inserir automaticamente a data atual ou Data e hora com código VBA
Duplo clique para inserir automaticamente a data atual ou Data e hora com código VBA
Se pretender inserir a data atual ou a data e hora numa célula bastando fazer duplo clique nela, pode conseguir facilmente este resultado com um pequeno código VBA. Este método é ideal para utilizadores que trabalham com formulários, folhas de presença ou qualquer cenário em que as datas precisem de ser registadas de forma rápida e precisa. A solução VBA oferece flexibilidade para definir um intervalo específico de células, com atualizações instantâneas após o duplo clique.
1. Na sua folha de cálculo, clique com o botão direito do rato no separador na parte inferior correspondente à folha onde deseja esta funcionalidade e, em seguida, escolha Ver Código no menu que aparece. Isto abre o Editor do Visual Basic apenas para essa folha — certifique-se de que está a editar a folha correta, pois o código aplicar-se-á exclusivamente a ela.
2. Na janela do Microsoft Visual Basic for Applications, copie e cole o código VBA abaixo na janela de código da folha.
Código VBA: Duplo clique para adicionar a data atual numa célula
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("A1:B10")) Is Nothing Then
Cancel = True
Target.Formula = Date
End If
End SubNotas:
Dica prática: Fazer duplo clique fora do intervalo limitado não insere a data; certifique-se de que as suas células-alvo estão incluídas no intervalo definido.
Aviso de erro: Se verificar que o código não está a funcionar como esperado, confirme se introduziu o código na folha correta (e não num módulo padrão) e se as macros estão ativadas no seu ambiente do Excel. Caso as definições de segurança bloqueiem a execução de macros, terá de as ajustar em Ficheiro > Opções > Centro de Confiança > Definições do Centro de Confiança.
3. Após introduzir o código, prima simultaneamente Alt + Q para fechar a janela do Microsoft Visual Basic for Applications e regressar à sua folha de cálculo. Isto garante que quaisquer alterações feitas no editor são guardadas.
Agora, sempre que fizer duplo clique em qualquer célula dentro do intervalo limitado (por exemplo,)A1:B10), o Excel preencherá automaticamente essa célula com a data atual ou com a data e hora, consoante a configuração definida no código. Esta automação simples economiza tempo e ajuda a manter um registo consistente.
Desbloqueie a Magia do Excel com KUTOOLS AI
- Execução Inteligente: Realize operações em células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- fórmulas personalizadas: Crie fórmulas personalizadas para simplificar os seus fluxos de trabalho.
- Programação VBA: Escreva e implemente código VBA com facilidade.
- Interpretação de Fórmulas: Compreenda facilmente fórmulas complexas.
- Tradução de Texto: Elimine barreiras linguísticas nas suas folhas de cálculo.
Artigos relacionados:
- Como fazer duplo clique numa célula e adicionar 1 ao seu valor no Excel?
- Como inserir uma marca de verificação numa célula ao dar um duplo clique 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