ユーザーがインスペクターを使用して Microsoft Outlook アイテムを送信するたびに (インスペクターが閉じられる前ですが、ユーザーが [送信] ボタンをクリックした後)、または MailItem などの Outlook アイテムの送信メソッドがプログラムで使用されている場合に発生します。
構文
expression.
ItemSend( _Item_ , _Cancel_ )
式Application オブジェクトを表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| Item | 必須 | オブジェクト型 (Object) | 送信されるアイテムです。 |
| Cancel | 必須 | Boolean | イベントが発生すると、 False が渡されます。 イベント プロシージャでこの引数に True を設定すると、送信操作は完了せずに、インスペクターは開いたままです。 |
注釈
このイベントは Microsoft Visual Basic Scripting Edition (VBScript) では使用できません。
例
次の Microsoft Visual Basic for Applications (VBA) の例は、ユーザー入力に応答して ItemSend イベントを取り消す方法を示しています。 サンプル コードをクラス モジュールに配置する必要があり、Outlook によってイベント プロシージャを呼び出すことができます前に、 Initialize_handlerルーチンを呼び出す必要があります。
Public WithEvents myOlApp As Outlook.Application
Public Sub Initialize_handler()
Set myOlApp = Outlook.Application
End Sub
Private Sub myOlApp_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim prompt As String
prompt = "Are you sure you want to send " & Item.Subject & "?"
If MsgBox(prompt, vbYesNo + vbQuestion, "Sample") = vbNo Then
Cancel = True
End If
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。