Ugrás a tartalomra

A létrehozott és utoljára módosított idő beolvasása és beillesztése a cellákba

Ez a cikk arról fog beszélni, hogy miként lehet lekérni az aktuális munkafüzet-információk létrehozási idejét és utoljára módosított idejét, és beilleszteni a létrehozott és az aktuális munkafüzet-információk utoljára módosított idejét az Excel celláiba.

Az Info paranccsal lekérheti a létrehozott és utoljára módosított időt az Excelben

Szerezze be a létrehozott és az utoljára módosított időt az Excelben a Speciális tulajdonságok funkcióval

Helyezze be a létrehozott és utoljára módosított időt az Excel VBA kóddal ellátott celláiba

Illessze be a létrehozott időt és az utolsó módosítás idejét a cellákba/fejlécbe/láblécbe a Kutools for Excel segítségével jó ötlet3


nyíl kék jobb buborék Az Info paranccsal lekérheti a létrehozott és utoljára módosított időt az Excelben

Megtudhatjuk az aktuális munkafüzet pontos létrehozási és utoljára módosított idejét a Microsoft Excel 2010/2013 kulisszatitkai nézetében.

Kattintson az filé > Info, és a kulisszák mögötti nézet jobb oldalán megjeleníti a Kapcsolódó dátumok információ. Alatt Kapcsolódó dátumok cím, felsorolja az utoljára módosított, a létrehozott és az utolsó nyomtatási időt. Lásd a következő képernyőképet:

-2

 

Jegyzet: Ez a módszer csak a Microsoft Excel 2010/2013 verzióban érhető el. Az Excel 2007-ben érvénytelen.


nyíl kék jobb buborékSzerezze be a létrehozott és az utoljára módosított időt az Excelben a Speciális tulajdonságok funkcióval

Valójában a Dokumentum tulajdonságai párbeszédpanelen megkaphatjuk az aktuális munkafüzet létrehozásának és utoljára módosított idejét.
1 lépés: Nyissa meg a Speciális tulajdonságok párbeszédablak:

Az Excel 2007 alkalmazásban kattintson a gombra Office gomb> Készít > Ingatlanok, És egy Dokumentum tulajdonságai sáv jelenik meg az eszköztár alatt, kattintson a gombra Dokumentum tulajdonságai > Speciális tulajdonságok, lásd a képernyőképeket:

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

 

Az Excel 2010/2013-ban kattintson a gombra filé > Info > Ingatlanok > Speciális tulajdonságok.

doc-insert-modified-4-4

2 lépés: Ban,-ben Speciális tulajdonságok párbeszédpanelen láthatja a létrehozott és az utoljára módosított időt a Statisztika fül alatt. Lásd a következő képernyőképet:

doc-insert-modified-4-4


nyíl kék jobb buborék Helyezze be a létrehozott és utoljára módosított időt az Excel VBA kóddal ellátott celláiba

A következő VBA makrók segítenek közvetlenül beilleszteni a cellákba az aktuális munkafüzet-információk létrehozási idejét és utoljára módosított idejét.

Helyezze be a létrehozott és az utoljára módosított időt az Excelbe

1 lépésTartsd le a ALT + F11 kulcsokat, és megnyitja a Microsoft Visual Basic for Applications ablakot.

2 lépés: Kattintson betétlap >> Modulok, és illessze be a következő makrót a Modul ablakba.

VBA kód: A létrehozott és az utoljára módosított idő beszúrása az Excelbe

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

3 lépés:Megnyomni a F5 gomb a makró futtatásához. Ezután a létrehozott dátum és az utoljára módosított dátum külön kerül beillesztésre az A1 és az A2 cellába.

Megjegyzések: az igényeinek megfelelően módosíthatja a VB célcelláját.

Helyezze be a munkafüzet utolsó módosított időpontját az Excelbe

1 lépésTartsd le a ALT + F11 kulcsokat, és megnyitja a Microsoft Visual Basic for Applications ablakot.

2 lépés: Kattintson betétlap >> Modulok, és illessze be a következő makrót a Modul ablakba.

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

3 lépés: Ezután mentse el és zárja be ezt a kódot, és térjen vissza a munkalapra, egy üres cellában írja be a következő képletet = ModDate (), és nyomja meg a gombot belép kulcs. Ezután beilleszti a cellába az utoljára módosított időpontot.

-2

Helyezze be a munkafüzet létrehozásának idejét az Excelbe

1 lépésTartsd le a ALT + F11 kulcsokat, és megnyitja a Microsoft Visual Basic for Applications ablakot.

2 lépés: Kattintson betétlap >> Modulok, és illessze be a következő makrót a Modul ablakba.

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

3 lépés: Mentse és zárja be ezt a kódot, térjen vissza a munkalapra, egy üres cellában írja be a képletet = CreateDate (), és nyomja meg a gombot belép kulcs. és a létrehozott dátum a következő képernyőképek szerint kerül beillesztésre a cellába:

-2

Jegyzet: Ha a cellája nem dátumformátumú, furcsa számot jeleníthet meg. Csak formázza ezt a cellát találka formátumban, normál dátumként jelenik meg.


nyíl kék jobb buborék Illessze be a létrehozott időt és az utolsó módosítás idejét a cellákba/fejlécbe/láblécbe a Kutools for Excel segítségével

Bemutathatok egy praktikus eszközt -Kutools az Excel számára amelyek több mint 300 hasznos funkcióval együtt javíthatják a munka hatékonyságát? Azzal Helyezze be a munkafüzet adatait funkcióval gyorsan beillesztheti a munkafüzet elérési útját, a munkafüzet / munkalap nevét, a felhasználó nevét vagy a létrehozott időt és az utoljára módosított időt a cellákba, a fejlécbe vagy a láblécbe.

Kutools az Excel számára, Több mint 300 a praktikus funkciók megkönnyítik a munkáját. 

Után ingyenes telepítés Kutools for Excel, kérjük, tegye a következőket:

1. kettyenés Kutools Plus > Munkafüzet > Helyezze be a munkafüzet adatait. Lásd a képernyőképet:
doc utoljára módosította a nevet2

2. Ezután a Helyezze be a munkafüzet adatait párbeszédpanelen ellenőrizze az Információ szakaszban beilleszteni kívánt információkat, majd lépjen be a beilleszteni kívánt hely megadásához, kiválaszthatja a cellákat, láblécet (bal lábléc, középső lábléc, jobb lábléc) vagy a fejlécet (bal fejléc, középső fejléc, jobb fejléc). Lásd a képernyőképet:
doc beszúrás létrehozott módosított idő 1

3. kettyenés Ok, és az ellenőrzött információkat beillesztette az Ön által megadott helyre.

Tipp. Ha ingyenes próbaverziót szeretne kapni a Munkafüzet információk beillesztése funkcióról, kérjük, menjen a Kutools for Excel ingyenes letöltéséhez először, majd lépjen a művelet végrehajtására a fenti lépések szerint.

nyíl kék jobb buborék Helyezze be a munkafüzet adatait


A legjobb irodai hatékonyságnövelő eszközök

🤖 Kutools AI Aide: Forradalmasítsa az adatelemzést a következők alapján: Intelligens végrehajtás   |  Kód létrehozása  |  Hozzon létre egyéni képleteket  |  Adatok elemzése és diagramok létrehozása  |  A Kutools funkciók meghívása...
Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

Leírás


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
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