Méthode MailMerge.CreateShortcut (Publisher)

Crée un raccourci vers le fichier qui contient la liste des destinataires ou des produits pour une composition de fusion et publipostage.

Syntaxe

expression. CreateShortcut (FileName)

Expression Variable qui représente un objet MailMerge .

Parameters

Nom	Requis/Facultatif	Type de données	Description
FileName	Obligatoire	String	Nom de la liste de diffusion ou du fichier de liste de produits pour lequel le raccourci doit être créé.

Remarques

La méthode CreateShortcut correspond à la commande Enregistrer un raccourci vers la liste des destinataires dans les volets Office Fusion et Email Fusion et fusion, et à la commande Enregistrer un raccourci dans la liste des produits dans le volet Office Fusion de catalogue dans l’interface utilisateur de Microsoft Publisher.

Les fichiers de destinataires de liste de distribution possèdent l’extension .ols (pour le raccourci de liste Microsoft Office).

Exemple

Le suivant Microsoft Visual Basic pour Applications (VBA) montre comment utiliser la méthode CreateShortcut pour créer un raccourci vers une liste de destinataires fusion et publipostage. Avant d'exécuter cette macro, assurez-vous que le document actif est connecté à une source de données. Si le document actif n’est pas déjà connecté à une source de données, vous pouvez utiliser la méthode OpenDataSource pour établir la connexion.

En outre, avant d’exécuter le code, remplacez nom d’utilisateur dans le chemin du dossier du fichier enregistré par le nom d’un utilisateur valide sur votre ordinateur, ou remplacez le chemin d’accès et le nom de fichier par le chemin d’accès et le nom de fichier de votre choix.

Notez que le chemin d’accès au dossier utilisé dans cet exemple est typique des chemins d’accès aux dossiers dans Windows. Vous devez disposer de l’autorisation d’enregistrer des fichiers dans le dossier que vous désignez.

Public Sub CreateShortcut_Example() 
 
 Dim pubMailMerge As Publisher.MailMerge 
 Set pubMailMerge = ThisDocument.MailMerge 
 
 pubMailMerge.CreateShortcut ("C:\Users\username\Documents\My Data Sources\MyRecipientList") 
 
End Sub

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.