Hvordan får jeg afsenderens tidszone for en modtaget e-mail i Outlook?

At få afsenderens tidszone for en modtaget e-mail er en god måde for dig at besvare e-mailen på et passende tidspunkt for at gøre dit arbejde mere effektivt. Denne artikel indeholder nogle metoder til at få afsenderens tidszone for en modtaget e-mail i Outlook.

Få afsenderens tidszone for en modtaget e-mail med internetoverskrifter
Få afsenderens tidszone for en modtaget e-mail med VBA-kode
Automatisk visning af afsenderens tidszone på meddelelsesoverskrift med Kutools til Outlook

Få afsenderens tidszone for en modtaget e-mail med internetoverskrifter

Du kan finde afsenderens tidszone for en e-mail i dens internetoverskrifter. Gør som følger.

1. Dobbeltklik for at åbne e-mailen, du får afsenderens tidszone.

2. Klik derefter på Beskedindstillinger knappen i Tags gruppe under Besked fanen. Se skærmbillede:

3. i Ejendomme vindue, kan du se afsenderens tidszone i Internetoverskrifter boks som vist nedenstående skærmbillede.

Afsenderens tidszone nytte af Kutools til Outlook kan hjælpe dig med at vise afsenderens tidszone på beskedoverskriften med kun en klik som nedenstående skærmbillede vist. Download og prøv det nu! (60-dages gratis spor)

Få afsenderens tidszone for en modtaget e-mail med VBA-kode

Nedenstående VBA-kode kan også hjælpe med at få afsenderens tidszone for en modtaget e-mail. Du kan gøre som følger.

1. Vælg en e-mail, du får afsenderens tidszone, tryk på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

2. i Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Modul. Kopier derefter nedenunder VBA-kode til modulet.

VBA-kode: Få afsenderens tidszone for en modtaget e-mail i 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. Tryk på F5 nøgle for at køre koden. Så a Kutools til Outlook dialogboksen vises med afsenderens tidszone, der er angivet indeni. Se skærmbillede:

Automatisk visning af afsenderens tidszone på meddelelsesoverskrift med Kutools til Outlook

Hvis du vil vise afsenderens tidszone direkte i beskedens overskrift, skal du prøve afsenderens tidszone-værktøj i Kutools til Outlook.

1. Efter installation af Kutools til Outlook skal du gå til Kutools Plus fanebladet, og klik derefter på Vis meddelelsesinfo > Afsenderens tidszone.

Derefter vises afsenderens tidszone straks i beskedens overskrift. Se skærmbillede:

Hvis du vil have en gratis prøveperiode (60 dage) af dette værktøj, klik for at downloade det, og gå derefter til at anvende handlingen i henhold til ovenstående trin.