Lorsque vous effectuez un publipostage vers des messages électroniques au format HTML dans Microsoft Word, les liens hypertexte dans les champs de source de données apparaissent sous forme de texte brut et sont inactifs. Cet article décrit deux méthodes pour contourner ce problème.
Méthode 1 : ajouter un champ de lien hypertexte autour du champ de fusion et publipostage
Ajoutez un champ de lien hypertexte autour du champ de fusion et publipostage pour générer un lien hypertexte dans les messages électroniques fusionnés. Après avoir suivi ces étapes, le lien hypertexte affiche le même texte dans tous les messages électroniques. En outre, le lien hypertexte se connecte à l’URL de source de données correcte.
Pour cela, procédez comme suit :
-
Démarrez Word et ouvrez le document que vous souhaitez fusionner dans le courrier électronique.
-
Sous l’onglet Publipostage du ruban, sélectionnez Démarrer le publipostage. Sélectionnez l’Assistant Fusion et publipostage pas à pas... et l’Assistant Fusion et publipostage s’affiche sur le côté droit.
-
Sous Sélectionner un type de document, sélectionnez Messages électroniques, puis Suivant.
-
Sous Sélectionner le document de départ, sélectionnez Utiliser le document actif, puis suivant.
-
Sous Sélectionner les destinataires, sélectionnez les destinataires que vous souhaitez utiliser, puis sélectionnez Suivant.
-
Placez le point d’insertion où vous souhaitez que le lien hypertexte apparaisse dans le message électronique.
-
Dans le menu Composants rapides de la section Texte de l’onglet Insérer le ruban , sélectionnez Champ.
-
Dans la liste Noms des champs , sélectionnez Lien hypertexte, puis OK. Le texte « Erreur ! Référence de lien hypertexte non valide » apparaît dans le document.
-
Appuyez sur ALT+F9 pour ouvrir le code du champ { HYPERLINK \* MERGEFORMAT }.
-
Placez le point d’insertion après HYPERLINK, puis ajoutez un espace.
-
Dans le menu Composants rapides de la section Texte de l’onglet Insérer le ruban , sélectionnez Insérer un champ de fusion.
-
Dans la liste Noms des champs , sélectionnez FusionnerField.
-
Dans la zone de texte Nom du champ, tapez le nom du champ de source de données qui contient le lien hypertexte, puis sélectionnez OK. Par exemple, si le nom du champ de source de données est « Address1 », le code du champ apparaît comme suit :
{ HYPERLINK { MERGEFIELD « Address1 » } \* MERGEFORMAT }
-
Appuyez sur ALT+F9 pour fermer le code de champ { HYPERLINK { MERGEFIELD "<Nom de champ>" } \* MERGEFORMAT }.
-
Placez le point d’insertion au début de l’erreur . Référence de lien hypertexte non valide » et remplacez le texte par le texte du lien hypertexte que vous souhaitez afficher. Par exemple, remplacez le texte par du texte tel que CLIQUEZ ICI.
Important : Veillez à ne pas supprimer le champ entier.
-
Sélectionnez le texte que vous avez tapé à l’étape 15. Sélectionnez le bouton de divulgation en bas à droite dans la section Styles de l’onglet Accueil du ruban, puis sélectionnez Lien hypertexte.
-
Dans l’Assistant Fusion et publipostage, sélectionnez Suivant, puis suivez les étapes restantes de l’Assistant Fusion et publipostage pour terminer le processus de fusion et publipostage.
Méthode 2 : Créer une macro qui modifie dynamiquement le texte du lien hypertexte
Microsoft fournit des exemples de programmation à titre d’illustration uniquement, sans garantie expresse ou implicite. Cela inclut, sans s’y limiter, les garanties implicites de qualité marchande ou d’adéquation à un usage particulier. Cet article suppose que vous êtes familiarisé avec le langage de programmation présenté et les outils utilisés pour créer et déboguer des procédures.
Les ingénieurs du support technique Microsoft peuvent vous aider à expliquer les fonctionnalités d’une procédure particulière, mais ils ne modifient pas ces exemples pour fournir des fonctionnalités supplémentaires ou construire des procédures pour répondre à vos besoins spécifiques. Créez une macro si vous souhaitez modifier dynamiquement le texte du lien hypertexte dans vos messages électroniques fusionnés.
Après avoir suivi ces étapes, le lien hypertexte affiche le texte basé sur l’URL dans la source de données. Pour cela, procédez comme suit :
-
Suivez les étapes décrites dans « Méthode 1 : Ajouter un champ de lien hypertexte autour du champ de fusion et publipostage ».
-
Dans le menu Outils , pointez sur Macro, puis sélectionnez Visual Basic Editor.
-
Appuyez sur F7. La fenêtre de code s’affiche.
-
Copiez et collez le code suivant dans la fenêtre de code :
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 -
Dans le menu Outils , pointez sur Macro, puis sélectionnez Macros.
-
Sélectionnez MergeToEmail, puis Exécuter.
Remarque : Pour chaque message électronique que vous envoyez à l’aide de cette macro, un message d’avertissement de Microsoft Outlook s’affiche.
Avertissement : Microsoft a confirmé qu’il s’agit d’un bogue dans les produits Microsoft répertoriés dans la section « S’applique à ».
Informations supplémentaires
Pour plus d’informations sur l’utilisation de la fonctionnalité de fusion et publipostage pour créer des messages électroniques, consultez : Comment utiliser le publipostage pour créer des messages électroniques dans Word 2002.
Pour plus d’informations sur la façon d’obtenir de l’aide avec Visual Basic pour Applications, accédez à :
305326 Liste des ressources de programmation pour Visual Basic pour Applications
