Méthode MailMergeFields.AddAsk (Word)

Article
04/07/2023

Ajoute un champ ASK à un document principal de fusion. Renvoie un objet MailMergeField.

Syntaxe

expression. AddAsk( _Range_ , _Name_ , _Prompt_ , _DefaultAskText_ , _AskOnce_ )

expression Obligatoire. Variable qui représente une collection « MailMergeFields ».

Parameters

Nom	Requis/Facultatif	Type de données	Description
Range	Obligatoire	Range (objet)	Emplacement du champ ASK.
Name	Obligatoire	String	Nom du signet auquel la réponse ou le texte par défaut est affecté. Pour afficher le résultat dans un document, utilisez un champ REF contenant le nom du signet.
Prompt	Facultatif	Variant	Texte affiché dans la boîte de dialogue.
DefaultAskText	Facultatif	Variant	Réponse qui sera automatiquement proposée dans la zone de texte de la boîte de dialogue. Correspond au commutateur \d d'un champ ASK.
AskOnce	Facultatif	Variant	True pour afficher la boîte de dialogue une seule fois au lieu de chaque fusion d’un nouvel enregistrement. Correspond au commutateur \o pour un champ ASK.

Valeur renvoyée

MailMergeField

Remarques

À la mise à jour, un champ ASK affiche une boîte de dialogue qui vous demande le texte à affecter au signet spécifié.

Exemple

Cet exemple montre comment ajouter un champ ASK à la fin du document principal de fusion actif.

Dim rngTemp As Range 
 
Set rngTemp = ActiveDocument.Content 
 
rngTemp.Collapse Direction:=wdCollapseEnd 
ActiveDocument.MailMerge.Fields.AddAsk _ 
 Range:=rngTemp, _ 
 Prompt:="Type your company name", _ 
 Name:="company", AskOnce:=True

Cet exemple montre comment ajouter un champ ASK après le dernier champ de fusion du fichier Main.doc.

Dim colMailMergeFields As Object 
Dim rngTemp As Range 
 
Set colMailMergeFields = Documents("Main.doc").MailMerge.Fields 
 
colMailMergeFields(colMailMergeFields.Count).Select 
 
Set rngTemp = Selection.Range 
 
rngTemp.Collapse wdCollapseEnd 
colMailMergeFields.AddAsk Range:=rngTemp, Name:="name", _ 
 Prompt:="What is your name"

Voir aussi

MailMergeFields, Collection d'objets

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.

Partager via