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.