Inspectors.Add, méthode (Outlook)
Crée une fenêtre d'inspecteur.
Syntaxe
expression. Ajouter_Item_
expression Variable qui représente un objet Inspectors .
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Item | Obligatoire | Object | Élément à afficher dans la fenêtre d'inspecteur lors de sa création. |
Valeur renvoyée
Objet Inspector qui représente une nouvelle fenêtre d’inspecteur.
Remarques
Cette méthode est essentiellement identique à la propriété GetInspector d’un élément Outlook, tel que MailItem.
Exemple
Cet exemple Microsoft Visual Basic pour Applications (VBA) invite l’utilisateur à entrer un nom de société, utilise la méthode Restrict pour localiser tous les éléments de contact dans le dossier Contacts portant ce nom et affiche chacun d’eux.
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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.