Outlook) (Items.ItemRemove 事件

會在某個項目從指定的集合中刪除時發生。

語法

expression。 ItemRemove

表達 代表 Items 物件的變數。

註解

當刪除 Personal Folders 檔案 (.pst) 中的最後一個專案，或從 PST 檔案、Microsoft Exchange 信箱或 Exchange 公用資料夾一次刪除 16 個或多個專案時，就不會執行此事件。 Microsoft Visual Basic Scripting Edition (VBScript) 中沒有這個事件。

範例

本 Microsoft Visual Basic for Applications (VBA) 範例會在使用者將連絡人從預設的 [連絡人] 資料夾中移除時，選擇性傳送通知訊息給工作群組。 範例程式碼必須放在類別模組中，而且 Initialize_handler 必須先呼叫常式，Microsoft Outlook 才能呼叫事件程序。

Public WithEvents myOlItems As Outlook.Items 
 
 
 
Public Sub Initialize_handler() 
 
 Set myOlItems = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderContacts).Items 
 
End Sub 
 
 
 
Private Sub myOlItems_ItemRemove() 
 
 Dim myOlMItem As Outlook.MailItem 
 
 If MsgBox("Do you want to notify the Sales Team?", vbYesNo + vbQuestion) = vbYes Then 
 
 Set myOlMItem = Application.CreateItem(olMailItem) 
 
 myOlMItem.To = "Sales Team" 
 
 myOlMItem.Subject = "Remove Contact" 
 
 myOlMItem.Body = "Remove the following contact from your list:" 
 
 myOlMItem.Display 
 
 End If 
 
End Sub

另請參閱

Items 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。