Comment obtenir le fuseau horaire de l'expéditeur d'un e-mail reçu dans Outlook?

Obtenir le fuseau horaire de l'expéditeur d'un e-mail reçu est un bon moyen pour vous de répondre à l'e-mail en temps opportun afin de rendre votre travail plus efficace. Cet article fournit des méthodes pour obtenir le fuseau horaire de l'expéditeur d'un e-mail reçu dans Outlook.

Obtenir le fuseau horaire de l'expéditeur d'un e-mail reçu avec des en-têtes Internet
Obtenir le fuseau horaire de l'expéditeur d'un e-mail reçu avec le code VBA
Afficher automatiquement le fuseau horaire de l'expéditeur sur l'en-tête du message avec Kutools for Outlook

Obtenir le fuseau horaire de l'expéditeur d'un e-mail reçu avec des en-têtes Internet

Vous pouvez trouver le fuseau horaire de l'expéditeur d'un e-mail dans ses en-têtes Internet. Veuillez faire comme suit.

1. Double-cliquez pour ouvrir l'e-mail, vous obtiendrez le fuseau horaire de l'expéditeur.

2. Puis cliquez sur le Options de message bouton dans le Tags groupe sous Message languette. Voir la capture d'écran:

3. dans le biens fenêtre, vous pouvez voir le fuseau horaire de l'expéditeur dans le En-têtes Internet boîte comme ci-dessous capture d'écran montrée.

LaFuseau horaire de l'expéditeur utilité de Kutools for Outlook peut vous aider à afficher le fuseau horaire de l'expéditeur sur l'en-tête du message en un seul clic, comme illustré ci-dessous. Téléchargez et essayez-le maintenant! (essai gratuit de 60 jours)

Obtenir le fuseau horaire de l'expéditeur d'un e-mail reçu avec le code VBA

Le code VBA ci-dessous peut également aider à obtenir le fuseau horaire de l'expéditeur d'un e-mail reçu. Vous pouvez faire comme suit.

1. Sélectionnez un e-mail dont vous obtiendrez le fuseau horaire de l'expéditeur, appuyez sur le autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module. Copiez ensuite le code VBA ci-dessous dans le module.

Code VBA: obtenir le fuseau horaire de l'expéditeur d'un e-mail reçu dans 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. appuie sur le F5 clé pour exécuter le code. Puis un Kutools for Outlook La boîte de dialogue apparaît avec le fuseau horaire de l'expéditeur répertorié à l'intérieur. Voir la capture d'écran:

Afficher automatiquement le fuseau horaire de l'expéditeur sur l'en-tête du message avec Kutools for Outlook

Si vous souhaitez afficher le fuseau horaire de l'expéditeur directement sur l'en-tête du message, veuillez essayer l'utilitaire Sender Time Zone de Kutools for Outlook.

1. Après avoir installé Kutools pour Outlook, accédez au Kutools Plus onglet, puis cliquez sur Afficher les informations du message > Fuseau horaire de l'expéditeur.

Le fuseau horaire de l'expéditeur est alors immédiatement affiché sur l'en-tête du message. Voir la capture d'écran:

Si vous souhaitez bénéficier d'un essai gratuit (60 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis passez à appliquer l'opération selon les étapes ci-dessus.