Ինչպե՞ս ստանալ ուղարկողի ժամային գոտին ստացված էլ. Փոստով Outlook- ում:

Ստացված էլփոստի ուղարկողի ժամային գոտու ստացումը լավ միջոց է ձեզ պատշաճ ժամկետում էլ-նամակին պատասխանելու համար ՝ ձեր աշխատանքն առավել արդյունավետ դարձնելու համար: Այս հոդվածը տրամադրում է որոշ եղանակներ ՝ Outlook- ում ստացված էլփոստի ուղարկողի ժամային գոտին ստանալու համար:

Ստացեք ուղարկողի ժամային գոտին ստացված էլ. Փոստով ինտերնետային վերնագրերով
Ստացեք ուղարկողի ժամային գոտին ստացված էլ. Փոստով VBA կոդով
Outlook- ի համար Kutools- ի հետ հաղորդագրության վերնագրի վրա ավտոմատ ցուցադրեք ուղարկողի ժամային գոտին

---

Ստացեք ուղարկողի ժամային գոտին ստացված էլ. Փոստով ինտերնետային վերնագրերով

Ուղարկողի ժամային գոտին կարող եք գտնել դրա ինտերնետային վերնագրերում: Խնդրում եմ, արեք հետևյալ կերպ.

1. Կրկնակի կտտացրեք ՝ էլփոստը բացելու համար դուք կստանաք ուղարկողի ժամային գոտին:

2. Այնուհետեւ կտտացրեք Հաղորդագրության ընտրանքներ կոճակը հատկորոշիչները խումբ տակ հաղորդագրություն ներդիր Տեսեք,

3. Մեջ Հատկություններ պատուհանում, ուղարկողի ժամային գոտին կարող եք տեսնել Ինտերնետային վերնագրեր տուփ, ինչպես ցույց է տրված նկարում

---

---

Ստացեք ուղարկողի ժամային գոտին ստացված էլ. Փոստով VBA կոդով

Ստորև ներկայացված VBA կոդը կարող է նաև օգնել ստացված նամակի ուղարկողի ժամային գոտին ստանալու համար: Կարող եք անել հետևյալ կերպ.

1. Ընտրեք էլ. Փոստ, որը կստանաք նրա ուղարկողի ժամային գոտին, սեղմեք այն ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլ. Դրանից հետո 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 ծածկագիրը գործելու համար: Հետո ա Outlook- ի համար նախատեսված գործիքներ երկխոսության տուփը հայտնվում է ուղարկողի ժամային գոտում, որը նշված է ներսում: Տեսեք,

---

Outlook- ի համար Kutools- ի հետ հաղորդագրության վերնագրի վրա ավտոմատ ցուցադրեք ուղարկողի ժամային գոտին

Եթե ​​ցանկանում եք ուղարկել ուղարկողի ժամային գոտին ուղղակիորեն հաղորդագրության վերնագրի վրա, փորձեք ուղարկել ուղարկողի ժամային գոտի օգտակար ծրագիրը Kutools- ի Outlook- ի համար:

1. Outlook- ի համար Kutools տեղադրելուց հետո անցեք այն Kutools Plus էջանշանը, ապա սեղմեք Showուցադրել հաղորդագրության տեղեկությունները > Ուղարկողի ժամային գոտի.

Այնուհետև ուղարկողի ժամային գոտին անմիջապես ցուցադրվում է հաղորդագրության վերնագրի վրա: Տեսեք,