如何在 Outlook 中取得已接收郵件寄件者的時區？

掌握寄件者的時區，有助於您在最合適的時間回覆郵件，提升工作效率。本文提供幾種方法，協助您在 Outlook 中快速取得已接收郵件寄件者的時區資訊。

透過網際網路郵件標頭取得已接收郵件的寄件者時區
使用 VBA 程式碼取得已接收郵件的寄件者時區
透過 Kutools for Outlook 在訊息標頭上自動顯示寄件者時區

---

透過網際網路郵件標頭取得已接收郵件的寄件者時區

您可透過郵件的網際網路郵件標頭查看寄件者的時區。請依照下列步驟操作：

1. 雙擊開啟您想獲取寄件者時區的郵件。

2. 接著，在「郵件」索引標籤的「標記」群組中，點擊「郵件選項」按鈕。請參閱截圖：

3. 在「內容」視窗中，您可於「網際網路郵件標頭」方塊內查看寄件者的時區，如下方截圖所示。

---

---

使用 VBA 程式碼取得已接收郵件的寄件者時區

下列 VBA 程式碼可協助您取得已接收郵件的寄件者時區，請依下列步驟操作：

1. 選取您想獲取寄件者時區的郵件，然後按下「Alt」+「F11」鍵，開啟「Microsoft Visual Basic for Applications」視窗。

2. 在「Microsoft Visual Basic for Applications」視窗中，點選「插入」>「模組」。接著將下方的 VBA 程式碼貼上至模組中，立即體驗自動化效率！

VBA 程式碼：在 Outlook 中取得已接收郵件的寄件者時區

Sub DisplayTimeZone()
'Updated by Extendoffice 2018/08/22
    Dim xMailItem As MailItem
    Dim xItem As Object, xTimezone As String
    Set xItem = Outlook.Application.ActiveExplorer.Selection.Item(1)
    If xItem.Class <> olMail Then Exit Sub
    Set xMailItem = xItem
    xTimezone = GetTimeZoneFromHeader(xMailItem)
    MsgBox xTimezone, vbInformation, "Kutools for Outlook"
    Set xMailItem = Nothing
End Sub

Function GetTimeZoneFromHeader(Item As Outlook.MailItem) As String
    Dim xPropertyAccessor As Outlook.PropertyAccessor
    Dim xHeader As String, xLineArr As Variant, xLine As Variant
    Const xInternetHeader As String = "http://schemas.microsoft.com/mapi/proptag/0x007D001E"
    On Error Resume Next
    Set xPropertyAccessor = Item.PropertyAccessor
    xHeader = xPropertyAccessor.GetProperty(xInternetHeader)
    If Len(xHeader) = 0 Then
        MsgBox "The message header is empty.", vbInformation, "Kutools for Outlook"
        Exit Function
    End If
    xLineArr = Split(xHeader, vbCrLf)
    For Each xLine In xLineArr
        If InStr(xLine, "Date:") = 1 Then
            GetTimeZoneFromHeader = Trim(Replace(xLine, "Date:", ""))
        End If
    Next
    Set xPropertyAccessor = Nothing
End Function

3. 按下「F5」鍵執行程式碼，隨即彈出「Kutools for Outlook」對話方塊，列出寄件者的時區。請參閱截圖：

---

透過 Kutools for Outlook 在訊息標頭上自動顯示寄件者時區

想直接在郵件標頭顯示寄件者的時區嗎？立即試用 Kutools for Outlook 的「寄件者時區」功能！

1. 安裝 Kutools for Outlook 後，請切換至「KUTOOLS PLUS」索引標籤，然後點選「顯示郵件資訊」>「寄件者時區」。

寄件者的時區將立即顯示於訊息標頭中。請參閱以下截圖：