Método MailMergeFields.AddAsk (Word)

Adiciona um campo ASK a um documento principal de mala direta. Retorna um objeto MailMergeField.

Sintaxe

expressão. AddAsk( _Range_ , _Name_ , _Prompt_ , _DefaultAskText_ , _AskOnce_ )

expressão Obrigatório. Uma variável que representa uma coleção 'MailMergeFields'.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Range	Obrigatório	Objeto Range	A localização do campo ASK.
Name	Obrigatório	String	O nome do indicador ao qual a resposta ou o texto padrão será atribuído. Use um campo REF com o nome do indicador para exibir o resultado em um documento.
Prompt	Opcional	Variant	O texto exibido na caixa de diálogo.
DefaultAskText	Opcional	Variant	A resposta padrão que aparece na caixa de texto quando a caixa de diálogo é exibida. Corresponde à opção \d para um campo ASK.
AskOnce	Opcional	Variantes	True para exibir a caixa de diálogo somente uma vez, e não sempre que um novo registro for mesclado. Corresponde à opção \o de um campo ASK.

Valor de retorno

MailMergeField

Comentários

Quando atualizado, um campo ASK exibe uma caixa de diálogo solicitando um texto para atribuir ao indicador especificado.

Exemplo

Este exemplo adiciona um campo ASK no final do documento principal de mala direta ativo.

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

Este exemplo adiciona um campo ASK depois do último campo de mala direta em 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"

Confira também

Objeto da coleção MailMergeFields

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.