Quando efetua uma impressão em série em mensagens de e-mail em formato HTML no Microsoft Word, as hiperligações nos campos da origem de dados aparecem como texto simples e estão inativas. Este artigo descreve dois métodos para contornar este problema.
Método 1: Adicionar um campo de hiperligação à volta do campo de impressão em série
Adicione um campo de hiperligação à volta do campo de impressão em série para gerar uma hiperligação nas mensagens de e-mail intercaladas. Depois de seguir estes passos, a hiperligação apresenta o mesmo texto em todas as mensagens de e-mail. Além disso, a hiperligação liga-se ao URL de origem de dados correto.
Para tal, siga estes passos:
-
Inicie o Word e abra o documento que pretende intercalar no e-mail.
-
No separador Mailings do Friso, selecione Iniciar Impressão em Série. Selecione Assistente de Impressão em Série Passo a Passo... e o Assistente de Impressão em Série é apresentado no lado direito.
-
Em Selecionar tipo de documento, selecione Mensagens de correio eletrónico e, em seguida, selecione Seguinte.
-
Em Selecionar o documento inicial, selecione Utilizar o documento atual e, em seguida, selecione Seguinte.
-
Em Selecionar destinatários, selecione os destinatários que pretende utilizar e, em seguida, selecione Seguinte.
-
Coloque o ponto de inserção onde pretende que a hiperligação seja apresentada na mensagem de e-mail.
-
No menu Peças Rápidas , na secção Texto do separador Inserir Friso , selecione Campo.
-
Na lista Nomes de campos , selecione Hiperligação e, em seguida, selecione OK. O texto "Erro! A referência de hiperligação não é válida" é apresentada no documento.
-
Prima Alt+F9 para abrir o código de campo { HIPERLIGAÇÃO \* MERGEFORMAT }.
-
Coloque o ponto de inserção após a HIPERLIGAÇÃO e, em seguida, adicione um espaço.
-
No menu Peças Rápidas na secção Texto do separador Inserir Friso , selecione Inserir Campo de Impressão em Série.
-
Na lista Nomes de campos , selecione MergeField.
-
Na caixa de texto Nome do campo, escreva o nome do campo de origem de dados que contém a hiperligação e, em seguida, selecione OK. Por exemplo, se o nome do campo de origem de dados for "Endereço1", o código de campo é apresentado da seguinte forma:
{ HIPERLIGAÇÃO { MERGEFIELD "Address1" } \* MERGEFORMAT }
-
Prima Alt+F9 para fechar o código de campo { HYPERLINK { MERGEFIELD "<Field Name>" } \* MERGEFORMAT }.
-
Coloque o ponto de inserção no início do "Erro! A referência de hiperligação não é válida" e substitui o texto pelo texto de hiperligação que pretende que seja apresentado. Por exemplo, substitua o texto por texto como CLIQUE AQUI.
Importante: Certifique-se de que não elimina todo o campo.
-
Selecione o texto que escreveu no passo 15. Selecione no botão inferior direito de divulgação na secção Estilos do separador Base do friso e, em seguida, selecione Hiperligação.
-
No Assistente de Impressão em Série, selecione Seguinte e, em seguida, siga os passos restantes no Assistente de Impressão em Série para concluir o processo de impressão em série.
Método 2: Criar uma macro que modifique dinamicamente o texto da hiperligação
A Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isto inclui, mas não se limita a, as garantias implícitas de comercialização ou adequação para um fim específico. Este artigo pressupõe que está familiarizado com a linguagem de programação que está a ser demonstrada e com as ferramentas que são utilizadas para criar e depurar procedimentos.
Os engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas não modificarão estes exemplos para fornecer funcionalidades adicionais ou criar procedimentos para satisfazer os seus requisitos específicos. Crie uma macro se quiser modificar dinamicamente o texto da hiperligação nas mensagens de e-mail intercaladas.
Depois de seguir estes passos, a hiperligação apresenta texto baseado no URL na origem de dados. Para tal, siga estes passos:
-
Siga os passos em "Método 1: Adicionar um campo de hiperligação à volta do campo de impressão em série".
-
No menu Ferramentas , aponte para Macro e, em seguida, selecione Visual Basic Editor.
-
Prima F7. É apresentada a janela de código.
-
Copie e cole o seguinte código na janela de código:
Sub MergeToEmail() Dim bDone As Boolean bDone = False Do While bDone = False ActiveDocument.Fields.Update For Each oHyperlink In ActiveDocument.Hyperlinks oHyperlink.TextToDisplay = oHyperlink.Address oHyperlink.Range.Font.Color = wdColorBlue oHyperlink.Range.Font.Underline = wdUnderlineSingle oHyperlink.Range.Font.UnderlineColor = wdColorBlue Next oHyperlink With ActiveDocument.MailMerge .Destination = wdSendToEmail .SuppressBlankLines = True ' You can modify the text "Enter Your Subject Here" or ' remove the following line if you do not want a subject ActiveDocument.MailMerge.MailSubject = "Enter Your Subject Here" With .DataSource .FirstRecord = ActiveDocument.MailMerge.DataSource.ActiveRecord .LastRecord = ActiveDocument.MailMerge.DataSource.ActiveRecord End With .Execute Pause:=False End With If ActiveDocument.MailMerge.DataSource.ActiveRecord = _ ActiveDocument.MailMerge.DataSource.RecordCount Then bDone = True End If ActiveDocument.MailMerge.DataSource.ActiveRecord = wdNextRecord Loop End Sub -
No menu Ferramentas , aponte para Macro e, em seguida, selecione Macros.
-
Selecione MergeToEmail e, em seguida, selecione Executar.
Nota: Para cada mensagem de e-mail que enviar com esta macro, é apresentada uma mensagem de aviso do Microsoft Outlook.
Aviso: A Microsoft confirmou que se trata de um erro nos produtos Microsoft listados na secção "Aplica-se a".
Mais Informações
Para obter mais informações sobre como utilizar a funcionalidade de impressão em série para criar mensagens de e-mail, aceda a: Como utilizar a impressão em série para criar mensagens de e-mail no Word 2002.
Para obter mais informações sobre como obter ajuda com Visual Basic for Applications, aceda a:
305326 Lista de recursos de programação para Visual Basic for Applications
