MailItem.AttachmentRead イベント (Outlook)

親オブジェクトのインスタンスの添付ファイルが読み取り用に開かれると発生します。

構文

式。 AttachmentRead( _Attachment_ )

expression は MailItem オブジェクトを表す変数です。

パラメーター

例

この Visual Basic for Applications (VBA) の例では、ユーザーが添付ファイルを読み取ろうとするとメッセージが表示されます。 サンプル コードを ThisOutlookSession などのクラス モジュールに配置し、イベント プロシージャを Microsoft Outlook で呼び出す前に、 TestAttachRead() プロシージャを呼び出す必要があります。 この例を実行するには、件名が 'テスト' で、少なくとも 1 つの添付ファイルを含むアイテムが受信トレイに少なくとも 1 つある必要があります。

Public WithEvents myItem As outlook.MailItem 
 
 
 
Private Sub myItem_AttachmentRead(ByVal myAttachment As Outlook.Attachment) 
 
 If myAttachment.Type = olByValue Then 
 
 MsgBox "If you change this file, also save your changes to the original file." 
 
 End If 
 
End Sub 
 
 
 
Public Sub TestAttachRead() 
 
 Dim atts As Outlook.Attachments 
 
 Dim myAttachment As Outlook.Attachment 
 
 
 
 Set myItem = Application.ActiveExplorer.CurrentFolder.Items("Test") 
 
 Set atts = myItem.Attachments 
 
 myItem.Display 
 
End Sub

関連項目

MailItem オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。