Propriedade MailMergeDataSource.HeaderSourceName (Word)

  • Artigo

Retorna o caminho e o nome da fonte de cabeçalho anexada ao documento principal de mala direta especificada. String somente leitura.

Sintaxe

expression. HeaderSourceName

Expressão Uma variável que representa um objeto 'MailMergeDataSource'.

Exemplo

Se uma fonte de cabeçalho estiver anexada ao documento ativo, este exemplo exibirá o nome de arquivo.

Dim strName As String 
 
strName = ActiveDocument.MailMerge.DataSource.HeaderSourceName 
If strName <> "" Then MsgBox strName

Este exemplo abre a fonte de cabeçalho anexada ao documento ativo se a fonte for um documento do Word.

Dim mmdsTemp As MailMergeDataSource 
 
Set mmdsTemp = ActiveDocument.MailMerge.DataSource 
 
If mmdsTemp.HeaderSourceType = wdMergeInfoFromWord Then 
 Documents.Open FileName:=mmdsTemp.HeaderSourceName 
End If

Confira também

Objeto MailMergeDataSource

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.