メインコンテンツへスキップ

Outlookで受信した電子メールの送信者のタイムゾーンを取得するにはどうすればよいですか?

受信した電子メールの送信者のタイムゾーンを取得することは、作業をより効率的にするために、適切な時間に電子メールに返信するための良い方法です。 この記事では、Outlookで受信した電子メールの送信者のタイムゾーンを取得するためのいくつかの方法を提供します。

インターネットヘッダーを使用して、受信した電子メールの送信者のタイムゾーンを取得します
VBAコードを使用して受信した電子メールの送信者のタイムゾーンを取得します
Kutools for Outlookを使用して、送信者のタイムゾーンをメッセージヘッダーに自動表示する


インターネットヘッダーを使用して、受信した電子メールの送信者のタイムゾーンを取得します

電子メールの送信者のタイムゾーンは、インターネットヘッダーで確認できます。 次のようにしてください。

1.ダブルクリックしてメールを開き、送信者のタイムゾーンを取得します。

2.次に、 メッセージオプション ボタンの タグ 下のグループ ビデオメッセージ タブ。 スクリーンショットを参照してください:

3。 の中に プロパティ ウィンドウでは、送信者のタイムゾーンを インターネットヘッダー 下のスクリーンショットのようなボックス。


Outlookのメッセージヘッダーに送信者のタイムゾーンを自動表示します。

 送信者のタイムゾーン の有用性 Outlook用Kutools 以下のスクリーンショットに示すように、XNUMXつのクリックだけでメッセージヘッダーに送信者のタイムゾーンを表示するのに役立ちます。 ダウンロードして今すぐ試してみてください! (60 日間の無料トレイル)


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用Kutools ダイアログボックスがポップアップし、送信者のタイムゾーンがリストされます。 スクリーンショットを参照してください:


Kutools for Outlookを使用して、送信者のタイムゾーンをメッセージヘッダーに自動表示する

送信者のタイムゾーンをメッセージヘッダーに直接表示する場合は、Kutools forOutlookの送信者タイムゾーンユーティリティを試してください。

1. Kutools for Outlookをインストールした後、 クツールズプラス タブ、[OK]をクリックします メッセージ情報を表示する > 送信者のタイムゾーン.

その後、送信者のタイムゾーンがメッセージヘッダーにすぐに表示されます。 スクリーンショットを参照してください:

  このユーティリティの無料トライアル(60日)が必要な場合は、 クリックしてダウンロードしてください、次に、上記の手順に従って操作を適用します。


最高のオフィス生産性向上ツール

Outlook用Kutools - Outlook を強化する 100 以上の強力な機能

🤖 AIメールアシスタント: AI の魔法を備えたインスタント プロのメール - ワンクリックで天才的な返信、完璧な口調、多言語の習得。メールを簡単に変革しましょう! ...

📧 自動メール: 不在時 (POP および IMAP で利用可能)  /  メール送信のスケジュール設定  /  メール送信時のルールによる自動CC/BCC  /  自動転送 (高度なルール)   /  あいさつを自動追加   /  複数受信者の電子メールを個別のメッセージに自動的に分割する ...

📨 電子メール管理: メールを簡単に思い出す  /  件名などで詐欺メールをブロック  /  重複するメールを削除する  /  高度な検索  /  フォルダーを統合する ...

📁 アタッチメント プロバッチ保存  /  バッチデタッチ  /  バッチ圧縮  /  自動保存   /  自動デタッチ  /  自動圧縮 ...

🌟 インターフェースマジック: 😊もっと可愛くてクールな絵文字   /  タブ付きビューで Outlook の生産性を向上  /  Outlook を閉じる代わりに最小化する ...

???? ワンクリックの驚異: 受信した添付ファイルをすべてに返信する  /   フィッシングメール対策  /  🕘送信者のタイムゾーンを表示 ...

👩🏼‍🤝‍👩🏻 連絡先とカレンダー: 選択したメールから連絡先を一括追加  /  連絡先グループを個別のグループに分割する  /  誕生日のリマインダーを削除する ...

オーバー 100の特長 あなたの探索をお待ちしています! ここをクリックして詳細をご覧ください。

 

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations