Dit artikel illustreert hoe u in excel een tijdstempel aanbrengt wanneer een cel verandert. Het kan zijn dat u de invoer van gegevens in de cellen van een bepaalde kolom moet bijhouden. U hebt bijvoorbeeld kolom B gereserveerd voor de invoer van gegevens. Nu wilt u het tijdstempel in een aangrenzende cel in kolom C wanneer een cel wordt bijgewerkt in kolom B. Dit artikel helpt u daarbij op 2 effectieve manieren.

Download Praktijk Werkboek

U kunt het oefenwerkboek downloaden via de onderstaande downloadknop.

2 Manieren om tijdstempel in te voegen in Excel wanneer cel verandert

1. IF, AND, NOW en andere functies gebruiken om tijdstempels in te voegen in Excel

Volg de onderstaande stappen om met behulp van formules een tijdstempel te krijgen wanneer een cel verandert.

📌 Stappen

• Eerste pers ALT+F+T om te openen Excel-opties Ga dan naar de Formules tabblad. Controleer vervolgens de Iteratieve berekening inschakelen vinkje. Stel vervolgens de Maximale Iteraties op 1. Klik daarna op OK.

• Voer nu de volgende formule in cel C5 Sleep dan de Vulgreep om de formule naar de onderstaande cellen te kopiëren.

• Voer dan de volgende formule in de cel D5 Sleep vervolgens de Vulgreep pictogram naar de onderstaande cellen zoals eerder.

• Begin nu met het invoeren van waarden in de cellen in kolom B Daarna krijg je het volgende resultaat. Hier, kolom D is een hulpkolom. U kunt deze verbergen door rechts te klikken nadat u de kolom hebt geselecteerd.

• U kunt ook gewoon de volgende formule invoeren in cel C5 om hetzelfde resultaat te krijgen.

• Mogelijk moet u de opmaak van de cellen in kolom C Selecteer de kolom door bovenaan op het kolomnummer te klikken. Druk vervolgens op CTRL+1 om de Cellen opmaken dialoogvenster. Klik nu op de Aangepaste nummerformaat. Voer vervolgens d-mmm-jjjj hh:mm:ss AM/PM in de Type Klik tenslotte op OK.

Formule Breakdown:

Formule in cel C5:

➤ IF(B5="","",C5))

De IF-functie geeft niets terug als cel B5 is leeg. Anders geeft het dezelfde waarde terug die is opgeslagen in C5 .

NU()

De NU-functie geeft de huidige datum en tijd.

➤ EN(B5"",D5B5)

De EN-functie geeft terug. WARE als beide argumenten waar zijn, d.w.z. cel B5 is niet leeg en cellen B5 en D5 hebben niet dezelfde waarde.

➤ IF(AND(B5"",D5B5),NOW(),IF(B5="","",C5))

Als de EN-functie geeft terug. WARE dan is de IF-functie geeft de huidige datum en tijd, verkregen uit de NU-functie Anders geeft het het resultaat terug van het argument dat de IF-functie .

Formule in cel D5:

➤ ISNUMBER(D5)

De Functie ISNUMBER geeft terug. WARE als cel D5 een getal bevat. Anders geeft het Valse .

EN(ISNUMBER(D5),B5=D5)

De EN-functie geeft terug. WARE als cel D5 bevat een getal en cellen B5 en D5 dezelfde waarde hebben. FALSE anders.

➤ OF(C5="",AND(ISNUMBER(D5),B5=D5))

De OF-functie geeft terug. WARE als een van de argumenten waar is, d.w.z. cel C5 leeg is of de EN-functie geeft terug. WARE Het geeft terug FALSE als alle argumenten onwaar zijn.

➤ IF(OR(C5="",AND(ISNUMBER(D5),B5=D5)),D5,B5)

De IF-functie geeft dezelfde waarde terug die is opgeslagen in cel D5 als de OF-functie geeft terug. WARE Anders wordt de waarde van cel B5 .

➤ IF(B5="","",IF(OR(C5="",AND(ISNUMBER(D5),B5=D5)),D5,B5))

De IF-functie geeft niets terug als cel B5 is leeg. Anders geeft het het resultaat terug van het argument dat de IF-functie .

Lees meer: Hoe Excel tijdstempel invoegen wanneer cel verandert zonder VBA (3 manieren)

Vergelijkbare lezingen

• Statische datum invoegen in Excel (4 eenvoudige methoden)
• Excel VBA: Tijdstempel invoegen wanneer een macro wordt uitgevoerd
• Hoe Excel-datumstempel invoegen wanneer cellen in een rij zijn gewijzigd
• Unix Timestamp omzetten naar datum in Excel (3 methoden)

2. VBA-code toepassen om tijdstempel in Excel in te voegen wanneer cel verandert

U kunt in Excel ook een tijdstempel krijgen wanneer een cel verandert met behulp van VBA. Volg de onderstaande stappen om dat te kunnen doen.

📌 Stappen

• Klik eerst met de rechtermuisknop op het tabblad doelwerkblad. Selecteer vervolgens Code bekijken Dit opent de code module voor dat specifieke werkblad.

• Kopieer vervolgens de volgende code met behulp van de kopieerknop in de rechterbovenhoek.

 Private Sub Worksheet_Change(ByVal Target As Range) Dim CellCol, TimeCol, Row, Col As Integer Dim DpRng, Rng As Range CellCol = 2 TimeCol = 3 Row = Target.Row Col = Target.Column If Row <= 4 Then Exit Sub Timestamp = Format(Now, "DD-MM-YYYY HH:MM:SS AM/PM") If Target.Text "" Then If Col = CellCol Then Cells(Row, TimeCol) = Timestamp Else On Error Resume Next Set DpRng = Target.Dependents ForElke Rng In DpRng Als Rng.Column = CellCol Dan Cells(Rng.Row, TimeCol) = Timestamp Einde Als Volgende Einde Als Einde Sub 

• Plak daarna de gekopieerde code op de lege module zoals hieronder getoond.

• Vervolgens slaat u het document op als een werkmap met macro's Begin nu met het invoeren van gegevens in de cellen van kolom B. Dan krijg je dezelfde resultaten als eerder.

VBA-code uitleg:

Private Sub Worksheet_Change(ByVal Target As Range)

Dim CellCol, TimeCol, Row, Col als geheel getal

Dim DpRng, Rng Als Bereik

Het declareren van noodzakelijke variabelen.

CellCol = 2

Kolom voor gegevensinvoer.

TimeCol = 3

Timestamp kolom.

Rij = Doel.Rij

Col = Target.Column

Het opslaan van de rij- en kolomnummers van de geselecteerde cel.

Als Row <= 4 Dan Exit Sub

Veranderingen in de bovenste 4 rijen zullen geen tijdstempel aanmaken.

Tijdstempel = Formaat(Nu, "DD-MM-JJJJ HH:MM:SS AM/PM")

De tijdstempel wordt zo geformatteerd. Verander het naar wens.

Als Doel.Tekst "" Dan

Als Col = CellCol Dan

Cellen(Rij, TijdCol) = Tijdstempel

Maak een tijdstempel als de geselecteerde cel leeg is.

Bij fout Hervat Volgende

Negeert eventuele fouten.

Set DpRng = Target.Dependents

Voor elke Rng in DpRng

Als Rng.Column = CellCol Dan

Cellen(Rng.Row, TimeCol) = Tijdstempel

Maak tijdstempels voor een reeks cellen indien niet leeg.

Lees meer: Hoe automatisch tijdstempelgegevens invoegen in Excel (5 methoden)

Dingen om te onthouden

• U moet een aangepaste opmaak gebruiken voor de cellen in kolom B om een correct geformatteerd tijdstempel te krijgen.
• De alternatieve formule werkt alleen wanneer gegevens worden ingevoerd in lege cellen.
• Hier zijn de gegevensinvoer en de tijdstempelkolom hard gecodeerd in de VBA-code. U moet de code aanpassen op basis van uw dataset.

Conclusie

Nu weet u hoe u in excel een tijdstempel kunt zetten wanneer een cel verandert. Hebt u nog vragen of suggesties? Gebruik dan de commentaarsectie hieronder. U kunt ook onze ExcelWIKI Blijf bij ons en blijf leren.