Hyperlinks in gegevensvelden worden geconverteerd naar tekst zonder opmaak als u een samenvoegbewerking op e-mailberichten in HTML-indeling in Word 2002 en Word 2003 uitvoert

Methode 1: Een hyperlinkveld rond het samenvoegveld toevoegen

Een hyperlinkveld rond het samenvoegveld voor het genereren van een hyperlink in de samengevoegde e-mailberichten toevoegen. Nadat u deze stappen hebt uitgevoerd, wordt de hyperlink dezelfde tekst weergegeven in de e-mailberichten. Bovendien verbindt de hyperlink naar de URL van de juiste gegevensbron. Ga hiervoor als volgt te werk:

1. Start Word en open het document dat u samenvoegen wilt naar e-mailberichten.

2. Wijs Brieven en verzendlijstenin het menu Extra en klik vervolgens op Afdruk samenvoegen. De Wizard Afdruk samenvoegen wordt weergegeven.

3. Klik op e-mailberichtenonder Documenttype selecteren, en klik op volgende.

4. Onder het Begindocument selecteren, klikt u op het huidige document gebruikenen klik vervolgens op volgende.

5. Klik onder geadresseerden selecteren, selecteert u de geadresseerden die u wilt gebruiken en klik op volgende.

6. Plaats de invoegpositie op de plaats waar de hyperlink moet worden weergegeven in het e-mailbericht.

7. Klik in het menu Invoegen op veld.

8. Klik op de Hyperlinkin de lijst met veldnamen en klik op OK. De tekst 'fout! Hyperlinkverwijzing niet geldig' wordt weergegeven in het document.

9. Druk op ALT + F9 om te openen de {HYPERLINK \ * MERGEFORMAT} code veld.

10. Plaats de invoegpositie na de HYPERLINK en voegt u een spatie.

11. Klik in het menu Invoegen op veld.

12. Klik in de lijst met veldnamenMergeField.

13. Typ de naam van een veld in de gegevensbron waarin de hyperlink in het tekstvak naam en klik op OK. Bijvoorbeeld als "Address1" is de naam van een veld in de gegevensbron, de veldcode wordt weergegeven als volgt:

    {HYPERLINK {MERGEFIELD "Address1"} \ * MERGEFORMAT}

14. Druk op ALT + F9 om af te sluiten de {HYPERLINK {MERGEFIELD "< veldnaam >"} \ * MERGEFORMAT} code veld.

15. Plaats de invoegpositie aan het begin van de 'fout! Tekst van de hyperlinkverwijzing niet geldig", en de tekst vervangen door de tekst van de hyperlink die u wilt weergeven. Bijvoorbeeld de tekst overschrijven met tekst, zoals Klik hier.

    Belangrijk Zorg ervoor dat u het hele veld niet verwijderen.

16. Selecteer de tekst die u hebt getypt in stap 15. Klik op de Hyperlinkin de lijst stijl .

17. Klik op volgendein de Wizard Afdruk samenvoegen en vervolgens de overige stappen in de Wizard Afdruk samenvoegen om de samenvoegbewerking te voltooien.

Methode 2: Een macro maken die dynamisch worden gewijzigd de tekst van de hyperlink

Microsoft verstrekt programmeervoorbeelden dienen uitsluitend ter illustratie expliciete of impliciete. Dit omvat, maar is niet beperkt tot, de impliciete garanties van verkoopbaarheid of geschiktheid voor een bepaald doel. In dit artikel wordt ervan uitgegaan dat u bekend met de programmeertaal die wordt aangetoond en met de hulpprogramma's die worden gebruikt bent voor het maken van en naar procedures voor foutopsporing. Ondersteuningstechnici van Microsoft kunnen voor uitleg over de functionaliteit van een bepaalde procedure, maar zij zullen deze voorbeelden bieden extra functionaliteit of desgewenst uw specifieke vereisten niet wijzigen. Macro's maken als u wilt dat de tekst van de hyperlink in uw samengevoegde e-mailberichten dynamisch te wijzigen. Nadat u deze stappen hebt uitgevoerd, wordt de hyperlink tekst die is gebaseerd op de URL in de gegevensbron. Ga hiervoor als volgt te werk:

1. Volg de stappen in ' methode 1: een hyperlink-veld rond het samenvoegveld toevoegen. "

2. Wijs Macroaan in het menu Extra en klik vervolgens op Visual Basic Editor.

3. Druk op F7. Het codevenster wordt weergegeven.

4. Kopieer en plak de volgende code in het codevenster:

   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
   
   

5. Wijs Macro aan in het menu Extra en klik vervolgens op macro's.

6. Klik op MergeToEmailen klik vervolgens op uitvoeren.

Opmerking Voor elk e-mailbericht dat u verzendt met behulp van deze macro, verschijnt een waarschuwingsbericht vanuit Microsoft Outlook. Voor meer informatie over dit probleem, klikt u op het volgende artikel in de Microsoft Knowledge Base:

290498 u ontvangt een waarschuwing wanneer u een derde partij-invoegtoepassing of aangepaste oplossing in Outlook 2002