共用方式為

Inspectors.Add 方法 (Outlook)

  • 發行項

建立新的檢查員視窗。

語法

表達式。加_Item_

表達 代表 Inspectors 物件的變數。

參數

名稱 必要/選用 資料類型 描述
項目 必要 Object 建立後要在檢查員視窗中顯示的項目。

傳回值

代表新偵測器視窗的 Inspector 物件。

註解

這個方法基本上與 Outlook 專案的 GetInspector 屬性相同，例如 MailItem。

範例

本Microsoft Visual Basic for Applications (VBA) 範例會提示使用者輸入公司名稱、使用 Restrict 方法來找出 [聯繫人] 資料夾中具有該名稱的所有聯繫人專案，並顯示每個聯繫人專案。

Sub DisplayMyContacts() 
 
 Dim myFolder As Folder 
 
 Dim myItems As Items 
 
 Dim myRestrictItems As Items 
 
 Dim answer As String 
 
 Dim filter As String 
 
 Dim myInspector As Inspector 
 
 Dim x As Integer 
 
 
 
 answer = InputBox("Enter the company name") 
 
 Set myFolder = Application.GetNamespace("MAPI") _ 
 
 .GetDefaultFolder(olFolderContacts) 
 
 filter = "[MessageClass] = 'IPM.Contact' AND [CompanyName] = '" & answer & "'" 
 
 
 
 Set myItems = myFolder.Items 
 
 Set myRestrictItems = myItems.Restrict(filter) 
 
 For x = 1 To myRestrictItems.Count 
 
 Set myInspector = Application.Inspectors.Add(myRestrictItems.Item(x)) 
 
 myInspector.Display 
 
 Next x 
 
End Sub

另請參閱

Inspectors 物件

支援和意見反應

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