Método MailMergeFields.AddIf (Word)
Adiciona um campo IF a um documento principal de mala direta. Retorna um objeto MailMergeField.
Sintaxe
expression. AddIf
( _Range_
, _MergeField_
, _Comparison_
, _CompareTo_
, _TrueAutoText_
, _TrueText_
, _FalseAutoText_
, _FalseText_
)
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 posição do campo IF. |
Mergefield | Obrigatório | String | O nome do campo de mala direta. |
Comparison | Obrigatório | WdMailMergeComparison | O operador utilizado na comparação. |
CompareTo | Opcional | Variant | O texto a ser comparado com o conteúdo de MergeField. |
TrueAutoText | Opcional | Variant | A entrada de AutoTexto que é inserida quando a comparação é verdadeira. Se esse argumento for especificado, TrueText será ignorado. |
TrueText | Opcional | Variant | O texto que é inserido quando a comparação é verdadeira. |
FalseAutoText | Opcional | Variant | A entrada de AutoTexto que é inserida quando a comparação é falsa. Se esse argumento for especificado, FalseText será ignorado. |
FalseText | Opcional | Variant | O texto que é inserido quando a comparação é falsa. |
Valor de retorno
MailMergeField
Comentários
Quando atualizado, um campo IF compara um campo em um registro com um valor especificado e insere o texto apropriado conforme o resultado da comparação.
Exemplo
Este exemplo insere "for your personal use" se o campo Company estiver em branco e "for your business" se o campo Company não estiver em branco.
ActiveDocument.MailMerge.Fields.AddIf Range:=Selection.Range, _
MergeField:="Company", Comparison:=wdMergeIfIsBlank, _
TrueText:="for your personal use", _
FalseText:="for your business"
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.
Comentários
https://aka.ms/ContentUserFeedback.
Em breve: Ao longo de 2024, eliminaremos os problemas do GitHub como o mecanismo de comentários para conteúdo e o substituiremos por um novo sistema de comentários. Para obter mais informações, consulteEnviar e exibir comentários de