Nota
O acesso a esta página requer autorização. Podes tentar iniciar sessão ou mudar de diretório.
O acesso a esta página requer autorização. Podes tentar mudar de diretório.
Uma coleção de objetos MailMergeDataField que representa os campos de dados em uma fonte de dados de mala direta.
Comentários
Use a propriedade DataFields para retornar a coleção MailMergeDataFields. O exemplo a seguir exibe os nomes de todos os campos na fonte de dados anexada.
For Each afield In ActiveDocument.MailMerge.DataSource.DataFields
MsgBox afield.Name
Next afield
Você não pode adicionar campos à coleção MailMergeDataFields. Quando um campo de dados é adicionado a uma fonte de dados, o campo é incluído automaticamente na coleção MailMergeDataFields. Use o método EditDataSource para editar o conteúdo de uma fonte de dados. O exemplo a seguir adiciona um campo de dados chamado "Autor" a uma tabela na fonte de dados anexada.
If ActiveDocument.MailMerge.DataSource.Type = _
wdMergeInfoFromWord Then
ActiveDocument.MailMerge.EditDataSource
With ActiveDocument.Tables(1)
.Columns.Add
.Cell(Row:=1, Column:=.Columns.Count).Range.Text = "Author"
End With
End If
Use DataFields (Index), onde Index é o nome do campo de dados ou o número de índice, para retornar um único objeto MailMergeDataField. O número de índice representa a posição do campo de dados na fonte de dados de mala direta. O exemplo a seguir recupera o primeiro valor do campo nome da fonte de dados anexada ao documento ativo.
first = ActiveDocument.MailMerge _
.DataSource.DataFields("FName").Value
O exemplo a seguir exibe o nome do primeiro campo de dados na fonte de dados anexada ao documento ativo.
MsgBox ActiveDocument.MailMerge.DataSource.DataFields(1).Name
Confira também
Referência do modelo de objeto do Word
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.