Ga naar hoofdinhoud

Voeg snel en automatisch datum en tijdstempel in Excel in

In Excel is het invoegen van datum en tijdstempel een normale bewerking. Hier in deze zelfstudie zal ik meerdere methoden introduceren voor het handmatig of automatisch invoegen van datum en tijdstempel in Excel-cellen door verschillende gevallen aan te bieden.

Voeg datum en tijdstempel in met snelkoppelingen

Voeg datum en tijdstempel in met formule

Formule om automatisch tijdstempel in te voegen tijdens het invoeren van gegevens in een andere kolom

VBA om automatisch een tijdstempel in te voegen tijdens het invoeren van gegevens in een andere kolom


Voeg datum en tijdstempel in met snelkoppelingen

Als u alleen de datum en tijdstempel in een paar cellen hoeft in te voegen, kunt u deze handmatig invoegen door op snelkoppelingen te drukken.

Huidige datum invoegen: Controle + :
doc tijdstempel invoegen 1

Huidige tijd invoegen: Shift + Controle + :
doc tijdstempel invoegen 2

Zie screenshot:
doc tijdstempel invoegen 3

Tips:

1. U kunt de uitgangen opmaken in de datumnotaties of tijdnotaties die u nodig heeft in Cellen opmaken dialoogvenster.

2. Als je hebt Kutools for Excel, kunt u de huidige datum of andere datums in een gespecificeerde datumnotatie invoegen met zijn Datum invoegen functie. Klik om gratis te downloaden
datum invoegen


Voeg datum en tijdstempel in met formule

Als u een datum of tijdstempel wilt invoegen die automatisch kan worden bijgewerkt, kunt u onderstaande formules gebruiken.

Voer de huidige datum in

= VANDAAG ()

Media Enter -toets en de huidige datum wordt in de cel ingevoegd.

Huidige tijd invoegen:

= NU ()

Druk op de Enter-toets en de huidige datum en tijd worden in de cel ingevoegd.
doc tijdstempel invoegen 4

Tips:

1. U kunt de uitgangen opmaken in de datumnotaties of tijdnotaties die u nodig heeft in Cellen opmaken dialoog. Als u bijvoorbeeld alleen de huidige tijd wilt weergeven, formatteert u de cel als Tijd nadat u de = NU () formule

2. Als u de huidige datum en tijd in de koptekst of voettekst van het werkblad wilt invoegen, kunt u de Voeg werkmapinformatie in functie van Kutools for Excel om deze klus snel af te handelen. Klik om gratis te downloaden
werkmapinformatie invoegen


Formule om automatisch tijdstempel in te voegen tijdens het invoeren van gegevens in een andere kolom

Stel dat er twee kolommen zijn, kolom A en kolom B, en nu wilt u het huidige tijdstempel in kolom B invoegen terwijl u gegevens invoert in kolom A, hoe kunt u dat dan doen?
automatisch tijdstempel invoegen 1

Tijdstempel automatisch invoegen tijdens het invoeren van gegevens

1. Klik eerst op Dien in > Opties om de te openen Excel-opties dialoogvenster, kies Formules in het linkerdeelvenster en controleer Schakel iteractieve berekening in in Berekeningsmogelijkheden groep. En klik OK.
doc tijdstempel invoegen 5

2. Typ deze formule in kolom B, bijvoorbeeld cel B1

= ALS (A1 <> "", ALS (B1 <> "", B1, NU ()), "")

sleep vervolgens de automatische vulgreep naar de cellen.
doc tijdstempel invoegen 6

3. Formatteer vervolgens de formulecellen als de datetime-indeling zoals u nodig hebt in de Cellen opmaken dialoogvenster: houd de formulecellen geselecteerd, klik met de rechtermuisknop om het contextmenu weer te geven, kies Cellen opmaken, dan de Cellen opmaken dialoogvenster verschijnt in het Eigen sectie die onder de Telefoon Nummer tab, typ het formaat dat je nodig hebt in het Type textbox, en klik OK.
doc tijdstempel invoegen 7

Wanneer u nu gegevens invoert in kolom A, wordt de huidige datetime ingevoegd in kolom B.
doc tijdstempel invoegen 8

Tijdstempel automatisch invoegen en bijwerken terwijl de cel in een andere kolom verandert

Als u automatisch een tijdstempel wilt invoegen tijdens het invoeren van een cel, en tegelijkertijd, als de invoer verandert, wordt het ingevoegde tijdstempel bijgewerkt, dan kunt u de onderstaande formule gebruiken:

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

A1 is de cel waarin u gegevens invoert, B1 is de cel met de formule die u een tijdstempel wilt invoegen.

Sleep de automatische vulgreep omlaag in de cellen die u gebruikt.
automatisch tijdstempel invoegen 2

Formatteer vervolgens de formulecellen als de datetime-indeling zoals u nodig hebt in de Cellen opmaken dialoogvenster: houd de formulecellen geselecteerd, klik met de rechtermuisknop om het contextmenu weer te geven, kies Cellen opmaken, dan de Cellen opmaken dialoogvenster verschijnt in het Eigen sectie die onder de Telefoon Nummer tab, typ het formaat dat je nodig hebt in het Type tekstvak, klik op OK.


VBA om automatisch een tijdstempel in te voegen tijdens het invoeren van gegevens in een andere kolom

Als u bekend bent met VBA-code, kunt u het onderstaande doen:

1. Klik met de rechtermuisknop op de werkbladtab die u gebruikt en kies Bekijk code vanuit het contextmenu.
doc tijdstempel invoegen 9

2. Vervolgens in de Microsoft Visual Basic voor toepassingen venster, plak onderstaande code.

VBA: tijdstempel automatisch invoegen

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

doc tijdstempel invoegen 10

3. Sla vervolgens deze code op. Zolang u gegevens invoert of gegevens wijzigt in kolom A, wordt het nieuwe tijdstempel vanaf nu in kolom B ingevoegd.

Note: u kunt de A- en B-kolom en de mm / dd / jjjj uu: mm: ss tijdnotatie in de VBA-code wijzigen om aan uw werkelijke behoefte te voldoen.

Als u de gedefinieerde functie wilt gebruiken, kunt u het onderstaande doen:

1. Houden Alt + F11 toetsen om het Microsoft Visual Basic voor toepassingen venster. En klik Invoegen > Module om een ​​lege module in te voegen.
doc tijdstempel invoegen 11

2. Plak onderstaande code in de nieuwe module. Sla vervolgens de code op en ga terug naar het werkblad.

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

doc tijdstempel invoegen 12

3. Typ deze formule in de cel die het tijdstempel wordt ingevoegd

= Formaatdatum (F1)

F1 is de cel waarin u gegevens invoert of gegevens wijzigt. Sleep vervolgens de automatische vulgreep naar de cellen.
doc tijdstempel invoegen 13

Nu wordt de huidige datetime ingevoegd als cel F1 gegevens heeft ingevoerd of bijgewerkt.


Andere bewerkingen (artikelen) met betrekking tot DateTime

Converteer de datum die is opgeslagen als tekst naar de datum in Excel
Af en toe, wanneer u datums uit andere gegevensbronnen naar de Excel-cel kopieert of importeert, kan de datum worden opgemaakt en opgeslagen als tekst. En hier introduceer ik de trucs om dergelijke datums die als tekst zijn opgeslagen, om te zetten naar standaarddatums in Excel.

Halfjaar / maand / uur optellen / aftrekken tot op heden of tijd in Excel
Het toevoegen van jaar, maand of uur tot datum of tijd is gebruikelijk in ons dagelijkse werk in Excel. Heb je ooit geprobeerd een half jaar, maand of uur toe te voegen aan een datum of tijd? Hier introduceer ik de trucs om met deze klus om te gaan.

Gemiddelde tijdstempels van de dag in Excel
U hebt bijvoorbeeld de inlogtijdstempels vastgelegd van elke keer dat een specifieke gebruiker een website in Excel bezocht, en nu wilt u deze tijdstempels gemiddeld om te voorspellen hoe lang deze gebruikers in de toekomst de website zullen bezoeken, hoe kunt u dit voor elkaar krijgen? ?

Bereken uren tussen tijden na middernacht in Excel
Stel dat u een tijdschema heeft om uw werktijd op te nemen, dan is de tijd in kolom A de begintijd van vandaag en de tijd in kolom B de eindtijd van de volgende dag. Normaal gesproken, als u het tijdsverschil tussen de twee tijden berekent door direct minus "= B2-A2", zal het niet het juiste resultaat weergeven


  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen en het bewaren van gegevens; Gespleten cellen inhoud; Combineer dubbele rijen en som / gemiddelde... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Favoriete formules en snel invoegen, Bereiken, grafieken en afbeeldingen; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Draaitabel groeperen op weeknummer, dag van de week en meer ... Toon ontgrendelde, vergrendelde cellen door verschillende kleuren; Markeer cellen met formule / naam...
kte tabblad 201905
  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
officetab onderkant
Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
If anyone can assist, I'm seeking help to create a formula that, when I change the status to 'Complete,' automatically records the date of that moment. Similarly, if I change the status for subsequent entries, it should capture the date of that day. Any guidance on creating this formula would be greatly appreciated.
This comment was minimized by the moderator on the site
Hi, We have used the following formula for auto-update timestamp

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

But, sometimes it works sometimes it doesn't. even faced for some user's it's working fine for some not.
Sometimes it shows circular reference pop message error for some-user.
when tried to rectify the error, we saw circular reference is grad out. Not sure how do we fix it.

Any help much apricated!!! Thankyou
This comment was minimized by the moderator on the site
Hi, thank you for this, it is very helpful with my project.

I' m running calculations on stock market information that is populating the spreadsheet with RTD;
I' m trying to create a timestamp when there is an update in the stock price, but this does not work, the "timestamp" cell remains blank.
(The cell that receives the stock price is RTD formula)

Any ideas what i should do ?
This comment was minimized by the moderator on the site
In the cells where the time stamp should show up, red text saying Time stamp shows up instead. No value in format mm/dd/yyyy hh:mm:ss is visible.
This comment was minimized by the moderator on the site
Hi, Celeste, I did not get your question clearly. If you want to show "Time Stamp" in the cell if there is empty in the entried cell, you just change the formula to:
=IF(A1<>"",IF(B1<>"",B1,NOW()),"Time Stamp")
This comment was minimized by the moderator on the site
the function uptades every time you open the excel file
it also updates the earlier data when you insert rows.
This comment was minimized by the moderator on the site
Hi, try to click Formulas tab and go to Calculation group to click Calculation Options > Manual, then the formula will not auto update.
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-manual-calculation.png
This comment was minimized by the moderator on the site
Thank you very much for your kind help. Unfortunately, the manual setting would stop my other formulas in the table, which is not good from my point of view.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations