如何在 Excel 中將 yyyymmddhhmmss 格式的日期轉換為標準的日期時間格式?
在實際應用中,經常會遇到從其他系統或記錄檔匯出的資料,其中日期與時間以單一連續字串呈現,格式為 yyyymmddhhmmss。例如,「20240630174521」代表 30/06/2024 17:45:21. 然而,Excel 無法自動將此類字串辨識為標準日期時間值,導致難以進行分析、排序或計算。將這類字串轉換為 Excel 可辨識的日期時間格式(例如 dd/mm/yyyy hh:mm:ss),對於後續的數據分析、篩選與報表製作至關重要。
本文提供實用的逐步操作指引,協助您將 yyyymmddhhmmss 字串轉換為標準 Excel 日期時間格式。我們將介紹多種方法,包括使用公式快速在儲存格內完成轉換、透過自動化 VBA 程式碼實現高效處理,以及運用 Microsoft Power Query(適用於 Excel)進行更靈活直觀的操作。這些方法適用於不同情境,您可依自身需求、資料規模及對 Excel 功能的熟悉程度,選擇最合適的解決方案。

使用公式將 yyyymmddhhmmss 轉換為標準設定日期時間格式
VBA 程式碼-自動將 yyyymmddhhmmss 轉換為標準日期時間
使用公式將 yyyymmddhhmmss 轉換為標準設定日期時間格式
Excel 公式能快速且可靠地將「yyyymmddhhmmss」格式的字串拆解並重新格式化為 Excel 可辨識的日期時間值,全程直接在工作表中完成,無需額外增益集或擴充工具。此方法最適合用於處理相對小型的資料集,或當您需要手動、透明且易於稽核的轉換方式時。
若要轉換該字串,請在空白儲存格中輸入下列公式(例如,若原始 yyyymmddhhmmss 值位於 A2 儲存格,則在 B2 儲存格輸入):
=TEXT(DATE(LEFT(A2,4),MID(A2,5,2),MID(A2,7,2))+TIME(MID(A2,9,2),MID(A2,11,2),MID(A2,13,2)),"dd/mm/yyyy hh:mm:ss") 操作說明:輸入公式後,按下 Enter 確認。若您在 A 欄中有一連串 yyyymmddhhmmss 格式的值,可從 B2 儲存格向下拖曳填滿控點,快速將公式套用至其他列——每個結果皆會以文字形式呈現格式化的日期與時間!
此方法非常適合用於臨時資料清理、小型清單,或當您希望在一個欄位保留原始字串,同時在另一欄位顯示格式化值的情境。 潛在缺點:公式結果仍為文字;若您需要 Excel 的真實日期時間值進行計算(例如計算時間差),可能還需將文字轉換為數字格式。

參數說明與提示:
- LEFT(A2,4):提取四位數年份
- MID(A2,5,2):提取兩位數月份
- MID(A2,7,2):提取兩位數日期
- MID(A2,9,2):提取兩位數小時
- MID(A2,11,2):提取兩位數分鐘
- MID(A2,13,2):提取兩位數秒數
- TEXT()函數會將結果轉換為使用者友善的日期時間字串。
可能發生的問題:若原始值長度非恰好 14 位數(例如缺少前置零,或誤以科學記號輸入),公式可能傳回錯誤或不正確結果。使用公式轉換前,請務必確認資料一致性!
或者,若您的資料始終恰好為 14 位數,可使用此較簡短的公式直接轉換字串並傳回 Excel 序號日期時間值(非文字):
=--TEXT(A2,"0000\-00\-00\ 00\:00\:00") 使用方式:在儲存格(如 B2)中輸入此公式後,按下 Enter。接著,您可能需要透過「設定儲存格格式」對話方塊,將結果儲存格格式設為 DD/MM/YYYY HH:MM:SS,以人類可讀的日期時間格式顯示數值。具體操作步驟:選取結果儲存格,按下滑鼠右鍵,選擇設定儲存格格式 → 自訂,並輸入格式代碼 dd/mm/yyyy hh:mm:ss。

第二種方法特別適合當您需要真正的日期值,而非文字字串時使用。

提示:若您打算將轉換後的日期時間結果用於進一步的日期運算(例如日期相減或計算持續時間),務必使用傳回序號的公式(即第二個公式),再依需求設定顯示格式。
疑難排解:若出現錯誤,請確認您的原始資料確實為純文字,且不含任何非數字字元。前後的空格也可能影響結果;若您懷疑是此問題,建議在公式中使用 TRIM(A2) 來清理資料。
VBA 程式碼-自動將 yyyymmddhhmmss 轉換為標準日期時間
對於需要處理大型資料集或希望自動化轉換流程的使用者來說,VBA(Visual Basic for Applications)提供了極具彈性的解決方案。透過逐一巡覽所選儲存格,即可將每個 yyyymmddhhmmss 格式的值轉換為標準的 Excel 日期時間值(可選擇原地轉換或輸出至指定欄位)。當您在避免跨多個儲存格撰寫公式,或資料經常更新時,此方法尤其實用。
此方法適合處理大型資料集或重複性任務。然而,使用 VBA 需啟用巨集,而這可能受到組織政策或 Excel 設定的限制。執行任何 VBA 程式碼前,務必先儲存檔案,因為所做變更未必能輕易復原。
操作步驟:
- 選取工作表中需要轉換的 yyyymmddhhmmss 值範圍(例如 A2:A100)。
- 按一下開發人員索引標籤 > Visual Basic,即可開啟 VBA 編輯器。在左側窗格中找到您的活頁簿,按右鍵並選取插入 > 模組,然後在程式碼視窗中貼上以下程式碼:
Sub Convert_yyyymmddhhmmss_To_DateTime()
Dim rng As Range
Dim cell As Range
Dim strDate As String
Dim y As Integer
Dim m As Integer
Dim d As Integer
Dim hh As Integer
Dim mm As Integer
Dim ss As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.InputBox("Select the range of yyyymmddhhmmss values to convert:", xTitleId, Selection.Address, Type:=8)
For Each cell In rng
strDate = Trim(cell.Value)
If Len(strDate) = 14 And IsNumeric(strDate) Then
y = CInt(Left(strDate, 4))
m = CInt(Mid(strDate, 5, 2))
d = CInt(Mid(strDate, 7, 2))
hh = CInt(Mid(strDate, 9, 2))
mm = CInt(Mid(strDate, 11, 2))
ss = CInt(Mid(strDate, 13, 2))
cell.Value = DateSerial(y, m, d) + TimeSerial(hh, mm, ss)
cell.NumberFormat = "dd/mm/yyyy hh:mm:ss"
End If
Next cell
End Sub 貼上程式碼後,請關閉 VBA 編輯器,返回 Excel,按下 Alt + F8 執行巨集,選取「Convert_yyyymmddhhmmss_To_DateTime」並按一下執行。此巨集將提示您選取範圍,並將每個 14 位數字串原地轉換為易讀的日期時間值!
提示與疑難排解:
- 若某些值無法轉換,請檢查其長度是否恰好為 14 位數、確認不含多餘空格,並確保所有字元均為數字。
- 若您希望保留原始資料不變,可在執行巨集前,先將轉換後的日期時間值複製至其他欄位。
- 執行巨集前,請務必先儲存目前的活頁簿,並確認 Excel 已啟用巨集功能。
優點:可快速處理大範圍資料,輕鬆自動化重複性任務。
缺點:需啟用巨集,在巨集安全性限制嚴格的環境中可能無法使用。

透過 KUTOOLS AI 解鎖 Excel 的神奇功能
- 智慧執行:透過簡易指令,輕鬆執行儲存格操作、分析資料,並建立圖表!
- 自訂公式:打造專屬公式,讓您的工作流程更順暢!
- VBA 編碼:輕鬆撰寫並套用 VBA 程式碼,立即提升工作效率!
- 公式解析:輕鬆掌握複雜公式!
- 文字翻譯:輕鬆打破試算表中的語言隔閡!
最佳 Office 生產力工具
| 🤖 | KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行 | 產生程式碼| 建立自訂公式 | 分析資料並產生圖表| 呼叫增強函數…… |
| 熱門功能:尋找、醒目提示或標記重複值 | 刪除空白行 | 合併列或儲存格而不遺失資料 | 不使用公式的四捨五入…… | |
| 高級 LOOKUP:多重條件 VLookup | 多重數值 VLookup | 跨多個工作表 VLookup | 模糊查找…… | |
| 高級下拉列表:快速建立下拉式清單 | 相依式下拉式清單 | 多選下拉式清單…… | |
| 欄位管理員:新增指定數量的欄位|移動欄位|切換隱藏欄位的可見狀態|比較範圍與欄位…… | |
| 精選功能:網格聚焦 | 設計視圖 |增強編輯欄 | 工作簿與工作表管理員 | 資源庫(自動文字)| 日期提取 | 合併工作表 | 加密/解密儲存格 | 依清單傳送電子郵件 | 超級篩選 | 特殊篩選(篩選粗體儲存格/斜體/刪除線……) ...... | |
| 頂尖 15 工具組:12 文字工具(添加文本,刪除特定字符,……)| 50+ 圖表 類型(甘特圖,……)| 40+ 實用公式(基於生日計算年齡,……)| 19 插入工具(插入二維碼,從路徑插入圖片,……)| 12 轉換工具(金額轉大寫,匯率轉換,……)| 7 合併和拆分工具(高級合併行,分割儲存格,……)|……以及更多 |
運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……
Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!
- 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
- 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
- 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!
所有 Kutools 增益集,一個安裝程式
Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!
- 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
- 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
- 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
- 30 天完整功能試用— 無需註冊,無需信用卡
- 超值之選— 比單獨購買各增益集更省費用