Inserir rapidamente e automaticamente Inserir data e carimbo de data/hora no Excel

No Excel, inserir data e carimbo de data/hora é uma operação comum. Neste tutorial, apresentamos vários métodos para inserir manual ou automaticamente data e carimbo de data/hora em células do Excel, adaptados a diferentes cenários.

Inserir data e carimbo de data/hora com atalhos

Inserir data e carimbo de data/hora com fórmula

Fórmula para inserir automaticamente um carimbo de data/hora ao introduzir dados noutra coluna

VBA para inserir automaticamente um carimbo de data/hora ao introduzir dados noutra coluna

---

Se precisar apenas de inserir data e carimbo de data/hora em algumas células, pode fazê-lo manualmente com atalhos.

Inserir data atual:Ctrl+:

Inserir hora atual:Shift+Ctrl+:

Ver captura de ecrã:

Dicas:

1. Pode formatar os resultados como formatos de data ou hora, conforme necessário, na caixa de diálogo Definir formato de célula.

2. Se tiver o Kutools para Excel, pode inserir a data atual ou outras datas num formato de data específico sempre que precisar, graças à sua função Inserir data. Clique para descarregar gratuitamente

---

Se pretender inserir uma data ou carimbo de data/hora que seja atualizado automaticamente, utilize as fórmulas abaixo.

Inserir data atual

=HOJE()

Prima a tecla Enter e a data atual será inserida na célula.

Inserir hora atual：

=AGORA()

Prima a tecla Enter e a data e hora atuais serão inseridas na célula.

Dicas:

1. Pode formatar os resultados como formatos de data ou hora conforme necessário na caixa de diálogo Definir formato de célula. Por exemplo, se pretender exibir apenas a hora atual, basta formatar a célula como Hora após utilizar a fórmula =AGORA().

2. Se pretender inserir a data e hora atuais no cabeçalho ou rodapé da folha de cálculo, pode utilizar a função Inserir Informações da Pasta de Trabalho do Kutools para Excel para realizar esta tarefa rapidamente.Clique para descarregar gratuitamente

---

Imagine que tem duas colunas, a Coluna A e a Coluna B, e pretende inserir automaticamente o carimbo de data/hora atual na Coluna B sempre que introduzir dados na Coluna A. Como pode fazê-lo?

Inserir automaticamente carimbo de data/hora ao introduzir dados

1. Em primeiro lugar, clique em Ficheiro > Opções para abrir a caixa de diálogo Opções do Excel, selecione Fórmulas no painel esquerdo, marque a opção Ativar cálculo iterativo no grupo Opções de cálculo e clique em OK.

2. Na coluna B, por exemplo, na célula B1, insira esta fórmula.

=IF(A1<>«»,IF(B1<>«»,B1,NOW()),«»)

e arraste a alça de preenchimento automático para as células abaixo.

3. Em seguida, formate as células com fórmulas no formato de data/hora pretendido na caixa de diálogo Definir formato de célula: mantenha as células com fórmulas selecionadas, clique com o botão direito do rato para abrir o menu de contexto e escolha Definir formato de célula. Abrirá-se então a caixa de diálogo Definir formato de célula. No separador Personalizar, localizado na secção Número, introduza o formato pretendido na caixa Tipo e clique em OK.

Agora, sempre que introduzir dados na Coluna A, a data e hora atuais serão automaticamente inseridas na Coluna B.

Inserir e atualizar automaticamente carimbo de data/hora quando a célula de outra coluna for alterada

Se pretender inserir automaticamente um carimbo de data/hora ao introduzir dados e, simultaneamente, atualizá-lo sempre que os dados forem alterados, pode utilizar a fórmula abaixo:

=IF(A1<>«»,IF(AND(B1<>«»,CELL(«address»)=ADDRESS(ROW(A1),COLUMN(A1))),NOW(),IF(CELL(«address»)<>ADDRESS(ROW(A1),COLUMN(A1)),B1,NOW())),«»)

A1 é a célula onde introduzirá os dados; B1 é a célula com a fórmula onde deseja inserir o carimbo de data/hora.

Arraste a alça de preenchimento automático até às células que deseja utilizar.

De seguida, formate as células com fórmulas no formato de data/hora pretendido na caixa de diálogo Definir formato de célula: mantenha as células com fórmulas selecionadas, clique com o botão direito do rato para abrir o menu de contexto e escolha Definir formato de célula. Abrirá então a caixa de diálogo Definir formato de célula. No separador Personalizar, localizado na secção Número, introduza o formato pretendido na caixa Tipo e clique em OK.

---

Se estiver familiarizado com código VBA, pode proceder da seguinte forma:

1. Clique com o botão direito do rato no separador da folha de cálculo que está a utilizar e escolha Exibir Código no menu de contexto.

2. Em seguida, na janela Microsoft Visual Basic para Aplicações, cole o código abaixo.

VBA: Inserir automaticamente carimbo de data/hora

Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyKutools20190919
Dim xRInt As Integer
Dim xDStr As String
Dim xFStr As String
On Error Resume Next
xDStr = "A" 'Data Column
xFStr = "B" 'Timstamp Column
If (Not Application.Intersect(Me.Range(xDStr & ":" & xDStr), Target) Is Nothing) Then
       xRInt = Target.Row
       Me.Range(xFStr & xRInt) = Format(Now(), "mm/dd/yyyy hh:mm:ss")
End If
End Sub

3. Em seguida, guarde este código. A partir de agora, sempre que introduzir ou alterar dados na Coluna A, será automaticamente inserido um novo carimbo de data/hora na Coluna B.

Nota: pode ajustar as colunas A e B, bem como o formato de hora mm/dd/aaaa hh:mm:ss no código VBA, conforme as suas necessidades reais.

Se pretender utilizar uma função definida, pode proceder da seguinte forma:

1. Prima as teclas Alt + F11 para abrir a janela Microsoft Visual Basic para Aplicações. Em seguida, clique em Inserir > Módulo para inserir um módulo em branco.

2. Cole o código abaixo no novo módulo, guarde-o e regresse à folha de cálculo.

Function FormatDate(xRg As Range)
'UpdatebyKutools20190919
On Error GoTo Err_01
If xRg.Value <> "" Then
    FormatDate = Format(Now, "mm/dd/yyyy hh:mm:ss")
Else
    FormatDate = ""
End If
Exit Function
Err_01:
    FormatDate = "Error"
End Function

3. Na célula onde pretende inserir o carimbo de data/hora, introduza esta fórmula

=FormatarData(F1)

F1 é a célula onde irá introduzir ou atualizar os seus dados. Depois, basta arrastar a alça de preenchimento automático para as células abaixo!

Agora, a data e hora atuais serão inseridas sempre que a célula F1 for preenchida ou atualizada.

---