Gå til hovedindhold

Få og indsæt den oprettede tid og sidste ændrede tid i celler

Denne artikel vil tale om måder at få den oprettede tid og den sidst ændrede tid for den aktuelle projektmappeinformation og indsætte den oprettede tid og den sidst ændrede tid for den aktuelle projektmappeinformation i celler i Excel.

Få den oprettede tid og sidst ændrede tid i Excel med Info-kommandoen

Få den oprettede tid og sidst ændrede tid i Excel med funktionen Avancerede egenskaber

Indsæt den oprettede tid og sidst ændrede tid i celler i Excel med VBA-kode

Indsæt den oprettede tid og sidst ændrede tid i celler / overskrift / sidefod med Kutools til Excel god idé3


pil blå højre boble Få den oprettede tid og sidst ændrede tid i Excel med Info-kommandoen

Vi kan finde ud af den nøjagtige oprettede tid og den sidste ændrede tid for den aktuelle projektmappe i backstage-visning af Microsoft Excel 2010/2013.

Klik på knappen File (Felt) > INFO, og i højre side af backstage-visningen viser den Relaterede datoer Information. Under Relaterede datoer titel, det viser den sidst ændrede tid, oprettet tid og sidste udskrevne tid. Se følgende skærmbillede:

-2

 

Bemærk: Denne måde er kun tilgængelig i Microsoft Excel 2010/2013. Det er ugyldigt i Excel 2007.


pil blå højre bobleFå den oprettede tid og sidst ændrede tid i Excel med funktionen Avancerede egenskaber

Faktisk kan vi få både oprettet tid og sidste ændrede tid for den aktuelle projektmappe i dialogboksen Dokumentegenskaber.
Trin 1: Åbn Avancerede egenskaber dialog boks:

Klik på i Excel 2007 Office knap> Forbered > EjendommeOg en Dokumentegenskaber bar vises under værktøjslinjen, klik Dokumentegenskaber > Avancerede egenskaber, se skærmbilleder:

doc-insert-modified-time-3-3
-1
doc-insert-modified-time-4-4

 

I Excel 2010/2013 skal du klikke på File (Felt) > INFO > Ejendomme > Avancerede egenskaber.

doc-insert-modified-time-4-4

Trin 2: I Avancerede egenskaber i dialogboksen, vil du se den oprettede tid og den sidste ændrede tid under fanen Statistik. Se følgende skærmbillede:

doc-insert-modified-time-4-4


pil blå højre boble Indsæt den oprettede tid og sidst ændrede tid i celler i Excel med VBA-kode

Følgende VBA-makroer hjælper dig med at indsætte den oprettede tid og den sidst ændrede tid for aktuelle projektmappeoplysninger direkte i celler.

Indsæt både oprettet tid og sidst ændret tid i Excel

Trin 1: Hold nede ALT + F11 nøgler, og det åbner vinduet Microsoft Visual Basic for Applications.

Trin 2: Klik indsatte >> Moduler, og indsæt følgende makro i modulvinduet.

VBA-kode: Indsæt både oprettet tid og sidst ændret tid i Excel

Sub Workbook_Open()
Range("A1").Value = Format(ThisWorkbook.BuiltinDocumentProperties("Creation Date"), "short date")
Range("A2").Value = Format(ThisWorkbook.BuiltinDocumentProperties("Last Save Time"), "short date")
End Sub

Trin 3: Tryk på F5 nøgle til at køre denne makro. Og derefter indsættes den oprettede dato og den sidste ændrede dato separat i celle A1 og celle A2.

Bemærk: du kan ændre destinationscellen i VB efter dine behov.

Indsæt sidst ændrede tidspunkt for projektmappen i Excel

Trin 1: Hold nede ALT + F11 nøgler, og det åbner vinduet Microsoft Visual Basic for Applications.

Trin 2: Klik indsatte >> Moduler, og indsæt følgende makro i modulvinduet.

Public Function ModDate()
ModDate = Format(FileDateTime(ThisWorkbook.FullName), "m/d/yy h:n ampm")
End Function

Trin 3: Gem og luk derefter denne kode, og gå tilbage til regnearket, i en tom celle, indtast formlen for = ModDate (), og tryk på Indtast nøgle. Derefter indsætter den sidst ændrede tid i cellen.

-2

Indsæt oprettet tid for projektmappe i Excel

Trin 1: Hold nede ALT + F11 nøgler, og det åbner vinduet Microsoft Visual Basic for Applications.

Trin 2: Klik indsatte >> Moduler, og indsæt følgende makro i modulvinduet.

Function CreateDate() As Date
CreateDate = ActiveWorkbook.BuiltinDocumentProperties("Creation Date")
End Function

Trin 3: Gem og luk denne kode, vend tilbage til regnearket, indtast formlen i en tom celle = Opret dato (), og tryk på Indtast nøgle. og den oprettede dato indsættes i cellen som følgende skærmbilleder vist:

-2

Bemærk: Hvis din celle ikke er datoformat, kan den vise et mærkeligt tal. Bare formater denne celle som Dato format, vises det som en normal dato.


pil blå højre boble Indsæt den oprettede tid og sidst ændrede tid i celler / overskrift / sidefod med Kutools til Excel

Må jeg introducere dig et praktisk værktøj--Kutools til Excel hvilke inklusive mere end 300 nyttige funktioner kan forbedre din arbejdseffektivitet? Med sin Indsæt projektmappeoplysninger funktion kan du hurtigt indsætte projektmappesti, projektmappe / regnearknavn, brugernavn eller oprettet tid og sidst ændrede tid i celler eller sidehoved eller sidefod.

Kutools til Excel, med mere end 300 praktiske funktioner, der gør dine job lettere. 

Efter gratis installation Kutools til Excel, gør venligst som nedenfor:

1. klik Kutools Plus > Workbook > Indsæt projektmappeoplysninger. Se skærmbillede:
doc sidst ændre navn2

2. Derefter i Indsæt projektmappeoplysninger dialog, tjek de oplysninger, du vil indsætte fra informationsafsnittet, og gå derefter til at specificere den placering, du vil indsætte til, du kan vælge celler, sidefod (venstre sidefod, midterste sidefod, højre sidefod) eller sidehoved (venstre sidehoved, centerhoved, højre overskrift). Se skærmbillede:
doc insert oprettet ændret tid 1

3. klik Ok, og de oplysninger, du kontrollerer, er indsat på det sted, du angiver.

Tip. Hvis du vil have en gratis prøveversion af funktionen Indsæt projektmappe, gå til gratis download Kutools til Excel først, og gå derefter til for at anvende handlingen i henhold til ovenstående trin.

pil blå højre boble Indsæt projektmappeoplysninger


Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
Comments (21)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I LOOOOOOOOVE YOU!!!! TKSSSSSSS
This comment was minimized by the moderator on the site
I want to automatically create a space between each customer in excel how do i do this??
This comment was minimized by the moderator on the site
Hi Team, I need your help. I am having an excel file, there i want to find the modified date of a particular cell. Please help me with the coding here, if possible. Thanks in advance.
This comment was minimized by the moderator on the site
I learned why "Last Save Time" was not working for me. I put my function in my .XLA file, and "ThisWorkbook" was referring to the .XLA file itself. Therefore I needed to get Application.ActiveWorkbook (presumably the location of the function call), ending up with: Function DocumentProperty(PropertyName As String) ' 'You can refer to document properties either by index value or by name. The following list shows the available built-in document property names: 'Title Subject Author 'Keywords Comments Template 'Last Author Revision Number Application Name 'Last Print Date Creation Date Last Save Time 'Total Editing Time Number of Pages Number of Words 'Number of Characters Security Category 'Format Manager Company 'Number of Bytes Number of Lines Number of Paragraphs 'Number of Slides Number of Notes Number of Hidden Slides 'Number of Multimedia Clips Hyperlink Base Number of Characters (with spaces) Call Application.Volatile(True) Dim ActiveUserWorkbook On Error Resume Next Set ActiveUserWorkbook = Application.ActiveWorkbook If Err.Number 0 Then DocumentProperty = "!!! Error getting Application.ActiveWorkbook: " & Err.Description Exit Function End If DocumentProperty = ActiveUserWorkbook.BuiltinDocumentProperties(PropertyName) If Err.Number 0 Then DocumentProperty = "!!! Unknown Property Name !!!" Exit Function End If End Function
This comment was minimized by the moderator on the site
I see that "Last Save Time" is only referenced ONCE in the code. I'm using Excel 2010.When I put "Last Save Time" into a function, even with Application.Volatile(true), the value never updates. Then I noticed that the value returned by "Last Save Time" does not appear in the Excel 2010 "Properties" page NOR any of the tabs in the "Advanced Properties" dialog. Could "Last Save Time" be some relic?
This comment was minimized by the moderator on the site
Thanks for the help, but I also had a problem with the cell not updating after a save without having to first close and reopen the workbook. I added the following code to the workbook which refreshes after a save event: Private Sub Workbook_AfterSave(ByVal Success As Boolean) If Success Then ActiveSheet.Calculate End If End Sub That did the trick for me. Hope it helps.
This comment was minimized by the moderator on the site
Could this be modified to display the Created Date of other closed files? I'd like to compare the Created Date of a file on my Desktop to a file on a public web server. I could create the formula to use your functions...CreateDate() of local file to CreateDate() of web file...and alert me to a change. I appreciate your help. Bruce
This comment was minimized by the moderator on the site
very very very very very very very very helpful thanks
This comment was minimized by the moderator on the site
Hiya Love love love this but sadly the date only is appearing in USA and in Australia we have dd/mm/yy I've tired changing it to this format using the "Date" section but have not had any luck. Any ideas?
This comment was minimized by the moderator on the site
Julie - in the VBA code use "dd/mm/yy hh:n" instead. That'll put the date in the "right" order! :lol:
This comment was minimized by the moderator on the site
Hey this was awesome. Is it possible to insert the created date and last modified date of a different workbook? I'm looking to create an index file that tells me when other documents were last updated. Thanks!!
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations