MailItem.SenderEmailAddress プロパティ (Outlook)
Outlook アイテムの送信者の電子メール アドレスを表す 文字列型 (String) の値を取得します。 読み取り専用です。
構文
expression。 SenderEmailAddress
expression は MailItem オブジェクトを表す変数です。
注釈
このプロパティは、MAPI プロパティの PidTagSenderEmailAddress に対応します。
例
次の Microsoft Visual Basic for Applications (VBA) の例では、受信トレイの Test という名前のフォルダー内のすべての項目をループし、''someone@example.com によって送信されたアイテムに黄色のフラグを設定します。 エラーなしでこの例を実行するには、テスト フォルダーが既定の 受信トレイ フォルダーに存在することを確認し、'' をsomeone@example.com Test フォルダー内の有効な送信者メール アドレスに置き換えます。
Sub SetFlagIcon()
Dim mpfInbox As Outlook.Folder
Dim obj As Outlook.MailItem
Dim i As Integer
Set mpfInbox = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Folders("Test")
' Loop all items in the Inbox\Test Folder
For i = 1 To mpfInbox.Items.Count
If mpfInbox.Items(i).Class = olMail Then
Set obj = mpfInbox.Items.Item(i)
If obj.SenderEmailAddress = "someone@example.com" Then
'Set the yellow flag icon
obj.FlagIcon = olYellowFlagIcon
obj.Save
End If
End If
Next
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。