Méthode NameSpace.CreateContactCard (Outlook)
Crée une instance d’un objet ContactCard pour le contact spécifié par le paramètre AddressEntry .
Syntaxe
expression. CreateContactCard
( _Address_
)
Expression Variable qui représente un objet « NameSpace ».
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
AddressEntry | Requis | AddressEntry | Objet AddressEntry qui représente l’utilisateur pour lequel la carte de visite doit être créée. |
Valeur renvoyée
Objet Office.ContactCard créé pour l’utilisateur spécifié.
Remarques
L’objet ContactCard est disponible dans la bibliothèque de types de Microsoft Office. Avant d’appeler CreateContactCard pour créer une carte de visite dans Microsoft Outlook, Outlook doit être connecté à une session Outlook.
Le paramètre AddressEntry est un objet AddressEntry qui représente l’un des types AddressEntry suivants définis dans l’énumération OlAddressEntryUserType :
olExchangeDistributionListAddressEntry
olExchangeRemoteUserAddressEntry
olExchangeUserAddressEntry
olOutlookContactAddressEntry
olSmtpAddressEntry
Outlook génère l’erreur E_INVALIDARG lorsque vous passez l’une des valeurs OlAddressEntryUserType suivantes en tant qu’argument à la méthode CreateContactCard :
olExchangeAgentAddressEntry
olExchangeOrganizationAddressEntry
olExchangePublicFolderAddressEntry
olLdapAddressEntry
olOtherAddressEntry
olOutlookDistributionListAddressEntry
Exemple
L’exemple de code suivant dans Microsoft Visual Basic pour Applications (VBA) affiche une carte de visite pour l’utilisateur actuel définie par la propriété CurrentUser de l’objet NameSpace .
Vous ne pouvez pas exécuter directement ce code depuis la fenêtre VBA. Pour exécuter le code, cliquez sur l’onglet Développeur, cliquez sur le menu Macros, puis sélectionnez Project1.DisplayContactCardForCurrentUser. Pour plus d’informations sur l’onglet Développeur, voir Exécution en mode Développeur dans Outlook.
Sub DisplayContactCardForCurrentUser()
Dim oCC As Office.ContactCard
Dim oAddrEntry As Outlook.AddressEntry
Set oAddrEntry = Application.session.CurrentUser.AddressEntry
Set oCC = Application.session.CreateContactCard(oAddrEntry)
oCC.Show msoContactCardFull, 100, 100, 100, 100, 100, True
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.