獲取並將建立時間和最後修改時間插入到單元格中

本文將介紹如何獲取當前工作簿的建立時間和最後修改時間，並將這些信息插入到 Excel 的單元格中。

使用 Info 命令獲取 Excel 中的建立時間和最後修改時間

使用 Kutools for Excel 在單元格/頁眉/頁腳中插入建立時間和最後修改時間

使用高級屬性功能獲取 Excel 中的建立時間和最後修改時間

使用 VBA 代碼在 Excel 的單元格中插入建立時間和最後修改時間

使用 Info 命令獲取 Excel 中的建立時間和最後修改時間

我們可以在 Microsoft Excel 2010 / 2013 的後台視圖中找到當前工作簿的確切建立時間和最後修改時間。

點擊 文件 > 信息，在後台視圖的右側會顯示 相關日期信息。在相關日期標題下，列出了最後修改時間、建立時間和最後打印時間。請參見以下截圖：

注意：此方法僅適用於 Microsoft Excel 2010/2013，在 Excel 2007 中無效。

使用 Kutools for Excel 在單元格/頁眉/頁腳中插入建立時間和最後修改時間

讓我向您介紹一款實用工具——Kutools for Excel ，它包含超過 300 種實用功能，可以提升您的工作效率。通過其 插入工作簿資訊 功能，您可以快速將工作簿路徑、工作簿/工作表名稱、使用者名稱或建立時間和最後修改時間插入到單元格或頁眉或頁腳中。

免費安裝 Kutools for Excel 後，請按照以下步驟操作：

1. 點擊 Kutools Plus > 工作簿 > 插入工作簿資訊。請參見截圖：

2. 然後在「插入工作簿資訊」對話框中，勾選要插入的信息（來自信息部分），然後指定要插入的位置，您可以選擇單元格、頁腳（左頁腳、中間頁腳、右頁腳）或頁眉（左頁眉、中間頁眉、右頁眉）。請參見截圖：

3. 點擊 確定，所選信息將被插入到指定位置。

提示：如果您想免費試用「插入工作簿資訊」功能，請先前往免費下載 Kutools for Excel，然後按照上述步驟進行操作。

使用高級屬性功能獲取 Excel 中的建立時間和最後修改時間

實際上，我們可以在文檔屬性對話框中獲取當前工作簿的建立時間和最後修改時間。
步驟 1：打開高級屬性對話框：

在 Excel 2007 中，點擊 Office 按鈕 > 準備 > 屬性，工具欄下方會顯示一個 文檔屬性 欄，點擊 文檔屬性 > 高級屬性，請參見截圖：

在 Excel 2010/2013 中，點擊 文件 > 信息 > 屬性 > 高級屬性。

步驟 2：在 高級屬性對話框中，您會在統計標籤下看到建立時間和最後修改時間。請參見以下截圖：

使用 VBA 代碼在 Excel 的單元格中插入建立時間和最後修改時間

以下 VBA 宏將幫助您直接在單元格中插入當前工作簿的建立時間和最後修改時間。

在 Excel 中插入建立時間和最後修改時間

步驟 1：按住 ALT + F11 鍵，打開 Microsoft Visual Basic for Applications 窗口。

步驟 2：點擊 插入 >> 模塊，並在模塊窗口中粘貼以下宏代碼。

VBA 代碼：在 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

步驟 3：按下 F5 鍵運行此宏。然後，建立日期和最後修改日期將分別插入到 A1 和 A2 單元格中。

注意：您可以根據需要在 VB 中修改目標單元格。

在 Excel 中插入工作簿的最後修改時間

步驟 1：按住 ALT + F11 鍵，打開 Microsoft Visual Basic for Applications 窗口。

步驟 2：點擊 插入 >> 模塊，並在模塊窗口中粘貼以下宏代碼。

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

步驟 3：保存並關閉此代碼，返回到工作表，在空白單元格中輸入公式 =ModDate()，然後按下 Enter 鍵。這樣就會在單元格中插入最後修改時間。

在 Excel 中插入工作簿的建立時間

步驟 1：按住 ALT + F11 鍵，打開 Microsoft Visual Basic for Applications 窗口。

步驟 2：點擊 插入 >> 模塊，並在模塊窗口中粘貼以下宏代碼。

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

步驟 3：保存並關閉此代碼，返回到工作表，在空白單元格中輸入公式 =CreateDate()，然後按下 Enter 鍵，建立日期將如以下截圖所示插入到單元格中：

注意：如果您的單元格不是日期格式，可能會顯示奇怪的數字。只需將該單元格設置為日期格式，它就會顯示為正常的日期。