如何在 Excel 中取得目前時區並顯示在儲存格中？

作者Siluvia修改日期2025-08-29

當您在協作或國際化環境中處理 Excel 試算表時，準確掌握系統設定的時區至關重要。透過在 Excel 儲存格中直接識別並顯示目前系統時區，可確保時間敏感型計算、報表與資料比對的精確性——尤其當檔案需跨不同地區使用者共享時更顯關鍵。遺憾的是，Excel 並未內建可直接於儲存格中提取系統時區資訊的函數。

使用自訂函數取得目前時區並顯示於儲存格

使用自訂函數取得目前時區並顯示於儲存格

若要將系統目前時區直接提取並顯示於 Excel 儲存格中，可使用以 VBA 撰寫的自訂函數（UDF）。此方法特別實用，尤其當您經常需要在活頁簿中取得這項資訊時。以下是詳細的操作步驟：

注意：此方法在您的 Excel 環境已啟用巨集並允許執行 VBA 程式碼時效果最佳，將直接讀取您電腦 Windows 系統中設定的地區格式。

1. 同時按下 Alt+F11 鍵，即可開啟 Microsoft Visual Basic for Applications（VBA）編輯器視窗。

2. 在 VBA 編輯器中，於左側專案窗格找到您的活頁簿，點選插入> 模組，即可為活頁簿新增一個空白模組，供您輸入自訂程式碼。請務必完整複製以下 VBA 程式碼，並小心貼上至該模組視窗中：

VBA 程式碼：在 Excel 中取得目前時區

Function GetTimeZoneAtPresent() As String
'Updated by Extendoffice 20180814
    Dim xObjIs, xObjI
On Error GoTo ER
    Set xObjIs = GetObject("winmgmts:\\.\root\cimv2").ExecQuery("Select * From Win32_TimeZone")
    If xObjIs.Count = 1 Then
        For Each xObjI In xObjIs
            If Len(xObjI.Caption) > 1 Then
                GetTimeZoneAtPresent = xObjI.Caption
                Exit Function
            Else
                GetTimeZoneAtPresent = "Null"
                Exit Function
            End If
        Next
    End If
ER:
    GetTimeZoneAtPresent = "Failed"
End Function

請務必完整複製上方所有程式碼。在執行巨集或自訂函數前，請先確認您的巨集設定已允許執行程式碼。若遇到錯誤或安全性警告，請立即透過檔案 > 選項 > 信任中心 > 信任中心設定 > 巨集設定進行調整，確保順利執行！

3. 貼上程式碼後，按下 Alt+Q，即可關閉 VBA 編輯器並返回 Excel。

4. 選擇任一欲顯示時區的儲存格，輸入下列公式：=GetTimeZoneAtPresent()，然後按下 Enter。所選儲存格將立即顯示您系統目前設定的時區！

此方法特別適用於需跨不同地理位置與同事共享，且時區明確性至關重要的自動化報表範本或儀表板。但請注意，自訂函數僅在活頁簿儲存為啟用巨集的檔案（.xlsm）時才有效；若您將檔案傳送給巨集已停用的使用者，結果可能無法更新或正確顯示。

詳情請參閱下方截圖：

使用自訂函數取得時區詳細資訊

若結果未顯示或出現錯誤，請檢查：

您的巨集設定已允許執行 VBA 程式碼。
程式碼已完整複製，且未經任何修改。
您目前並未使用 Excel Online 或處於受限制的環境中（VBA 解決方案僅適用於桌面版 Excel）。

若要更新或重新整理時區資訊，只需重新計算工作表（按下）F9），或在系統時區於 Excel 工作階段中變更後，重新輸入公式即可。

提示：此結果會反映您電腦作業系統的設定。當您分享檔案時，每位使用者只要在其本機 Excel 環境中重新計算公式，即可看到各自系統所對應的時區。

透過 KUTOOLS AI 解鎖 Excel 的神奇功能

智慧執行：透過簡易指令，輕鬆執行儲存格操作、分析資料，並建立圖表！
自訂公式：打造專屬公式，讓您的工作流程更順暢！
VBA 編碼：輕鬆撰寫並套用 VBA 程式碼，立即提升工作效率！
公式解析：輕鬆掌握複雜公式！
文字翻譯：輕鬆打破試算表中的語言隔閡！

運用 AI 驅動的工具強化您的 Excel 能力。立即下載體驗前所未有的高效！

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多