Hoppa till huvudinnehåll

Infoga snabbt och automatiskt datum och tidsstämpel i Excel

I Excel är det vanligt att infoga datum och tidsstämpel. Här i den här handledningen kommer jag att introducera flera metoder för att manuellt eller automatiskt infoga datum och tidsstämpel i Excel-celler genom att tillhandahålla olika fall.

Infoga datum och tidsstämpel med genvägar

Infoga datum och tidsstämpel med formel

Formel för att automatiskt infoga tidsstämpel medan du matar in data i en annan kolumn

VBA för att automatiskt infoga tidsstämpel medan du anger data i en annan kolumn


Infoga datum och tidsstämpel med genvägar

Om du bara behöver infoga datum och tidsstämpel i några celler kan du manuellt infoga dem genom att trycka på genvägar.

Infoga aktuellt datum: kontroll + :
doc infoga tidsstämpel 1

Infoga aktuell tid: shift + kontroll + :
doc infoga tidsstämpel 2

Se skärmdump:
doc infoga tidsstämpel 3

Tips:

1. Du kan formatera utdata som datumformat eller tidsformat som du behöver i Formatera celler dialog.

2. Om du har Kutools för Excel, kan du infoga det aktuella datumet eller andra datum i ett angivet datumformat som du behöver med dess Infoga datum funktion. Klicka för att ladda ner gratis
infoga datum


Infoga datum och tidsstämpel med formel

Om du vill infoga ett datum eller en tidsstämpel som kan uppdateras automatiskt kan du använda formlerna nedan.

Infoga aktuellt datum

= I DAG ()

Presse ange nyckel och aktuellt datum infogas i cellen.

Infoga aktuell tid :

= NU ()

Tryck på Enter-tangenten och aktuellt datum och tid infogas i cellen.
doc infoga tidsstämpel 4

Tips:

1. Du kan formatera utdata som datumformat eller tidsformat som du behöver i Formatera celler dialog. Till exempel vill du bara visa den aktuella tiden, bara formatera cellen som Tid efter användning av = NU () formeln

2. Om du vill infoga aktuellt datum och tid i kalkylbladets sidhuvud eller sidfot kan du använda Infoga arbetsbokinformation funktion av Kutools för Excel för att snabbt hantera detta jobb. Klicka för att ladda ner gratis
infoga information om arbetsboken


Formel för att automatiskt infoga tidsstämpel medan du matar in data i en annan kolumn

Antag att det finns två kolumner, kolumn A och kolumn B, nu vill du infoga den aktuella tidsstämpeln i kolumn B medan du anger data i kolumn A, hur kan du göra det?
automatisk infoga tidsstämpel 1

Auto infoga tidsstämpel när du anger data

1. Klicka först Fil > Tillbehör att öppna Excel-alternativ dialog, välj Formler i den vänstra rutan och kontrollera sedan Aktivera iteraktiv beräkning in Beräkningsalternativ grupp. Och klicka OK.
doc infoga tidsstämpel 5

2. I kolumn B skriver du till exempel cell B1 den här formeln

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

dra sedan handtaget för automatisk fyllning ner till cellerna.
doc infoga tidsstämpel 6

3. Formatera sedan formelcellerna som det datetime-format som du behöver i Formatera celler dialog: håll formelcellerna markerade, högerklicka för att visa snabbmenyn, välj Formatera celler, sedan Formatera celler dialogrutan dyker upp, i Custom avsnitt som under Antal fliken, skriv det format du behöver i Typ textruta och klicka OK.
doc infoga tidsstämpel 7

Nu när du anger data i kolumn A kommer den aktuella datatiden att infogas i kolumn B.
doc infoga tidsstämpel 8

Infoga och uppdatera tidsstämpel automatiskt medan celler ändras i en annan kolumn

Om du vill infoga tidsstämpel automatiskt medan cellinmatning, och samtidigt, om posten ändras, kommer den infogade tidsstämpeln att uppdateras, kan du använda formeln nedan:

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

A1 är cellen som du kommer att mata in data, B1 är cellen med formeln som du vill infoga tidsstämpel.

Dra handtaget för automatisk fyllning ner till cellerna du använder.
automatisk infoga tidsstämpel 2

Formatera sedan formelcellerna som det datatidsformat som du behöver i Formatera celler dialog: håll formelcellerna markerade, högerklicka för att visa snabbmenyn, välj Formatera celler, sedan Formatera celler dialogrutan dyker upp, i Custom avsnitt som under Antal fliken, skriv det format du behöver i Typ textruta, klicka OK.


VBA för att automatiskt infoga tidsstämpel medan du anger data i en annan kolumn

Om du känner till VBA-koden kan du göra som nedan:

1. Högerklicka på fliken kalkylblad du använder och välj sedan Visa kod från snabbmenyn.
doc infoga tidsstämpel 9

2. Sedan i Microsoft Visual Basic för applikationer fönster, klistra in under koden.

VBA: Auto infoga tidsstämpel

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 infoga tidsstämpel 10

3. Spara sedan den här koden. Från och med nu, så länge du anger data eller ändrar data i kolumn A, införs den nya tidsstämpeln i kolumn B.

Anmärkningar: du kan ändra A- och B-kolumn och mm / dd / åååå hh: mm: ss tidsformat i VBA-koden för att matcha ditt verkliga behov.

Om du vill använda den definierade funktionen kan du göra som nedan:

1. Håll Alt + F11 för att aktivera Microsoft Visual Basic för applikationer fönster. Och klicka Insert > Modulerna för att infoga en tom modul.
doc infoga tidsstämpel 11

2. Klistra in koden nedan till den nya modulen. Spara sedan koden och gå tillbaka till kalkylbladet.

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 infoga tidsstämpel 12

3. Skriv den här formeln i cellen som ska infogas tidsstämpel

= FormatDate (F1)

F1 är cellen som du kommer att mata in data eller ändra data. Dra sedan autofyllhandtaget ner till cellerna.
doc infoga tidsstämpel 13

Nu kommer den aktuella datatiden att infogas om cellen F1 matade in data eller uppdaterades.


Andra operationer (artiklar) relaterade till DateTime

Konvertera datum lagrat som text till datum i Excel
Ibland, när du kopierar eller importerar datum från andra datakällor till Excel-cellen, kan datumet formateras och lagras som texter. Och här introducerar jag knep för att konvertera sådana datum lagrade som texter till standarddatum i Excel.

Lägg till / subtrahera halvår / månad / timme till datum eller tid i Excel
Att lägga till år, månad eller timme till datum eller tid är vanligt i vårt dagliga Excel-arbete. Har du någonsin försökt lägga till ett halvt år, månad eller timme till datum eller tid? Här introducerar jag knep för att hantera det här jobbet.

Genomsnittliga tidsstämplar för dagen i Excel
Du har till exempel spelat in inloggningstidsstämplarna för varje gång en viss användare besökt en webbplats i Excel, och nu vill du genomsnittliga dessa tidsstämplar för att förutsäga den mest möjliga tiden som användarna kommer åt webbplatsen i framtiden, hur kan du få det gjort ?

Beräkna timmar mellan tider efter midnatt i Excel
Om du antar att du har en tidtabell för att registrera din arbetstid, är tiden i kolumn A starttiden för idag och tiden i kolumn B är sluttiden för nästa dag. Normalt, om du beräknar tidsskillnaden mellan de två gånger direkt minus "= B2-A2", kommer den inte att visa rätt resultat


  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner och förvaring av data; Delat cellinnehåll; Kombinera duplicerade rader och summa / genomsnitt... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Favorit och sätt snabbt in formler, Intervall, diagram och bilder; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Gruppering av pivottabell efter veckonummer, veckodagen och mer ... Visa olåsta, låsta celler av olika färger; Markera celler som har formel / namn...
kte-flik 201905
  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
officetab botten
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