Хипервръзки в полетата с източник на данни се конвертират в обикновен текст, когато изпълнявате циркулярен документ на имейл съобщения в HTML формат в Word 2002 и Word 2003

Метод 1: Добавяне на поле с хипервръзка около полето за циркулярни документи

Добавяне на поле с хипервръзка около полето за циркулярни документи да генерира хипервръзка в циркулярни имейл съобщения. След като изпълните тези стъпки, хипервръзката показва същия текст в имейл съобщения. Освен това хипервръзката се свързва с URL адрес на източника правилните данни. За да направите това, изпълнете следните стъпки:

1. Стартирайте Word и отворете документа, който искате да обедините за електронна поща.

2. В менюто инструменти посочете писма и съобщенияи след това щракнете върху Циркулярни документи. Появява се съветник за циркулярни документи.

3. Под Изберете тип документщракнете върху имейл съобщенияи след това щракнете върху напред.

4. При избор на начален документщракнете върху използване на текущия документи след това щракнете върху напред.

5. Под избор на получателиизберете получателите, които искате да използвате и щракнете върху напред.

6. Поставете точката на вмъкване, където искате хипервръзката в имейл съобщението.

7. В менюто Вмъкване щракнете върху поле.

8. В списъка с имената на полетата щракнете върху хипервръзкатаи щракнете върху OK. Текстът "грешка! Невалидна хипервръзка"се появява в документа.

9. Натиснете ALT + F9, за да отворите {хипервръзка \ * MERGEFORMAT} код на поле.

10. Поставете точката на вмъкване след хипервръзка и добавете интервал.

11. В менюто Вмъкване щракнете върху поле.

12. В списъка с имената на полетата щракнете върху MergeField.

13. В текстовото поле име на поле въведете името на полето с източник на данни, която съдържа хипервръзката и след това щракнете върху OK. Например ако името на полето на източник на данни "ИКТ1", код на поле изглежда по следния начин:

    {ХИПЕРВРЪЗКА {MERGEFIELD "ИКТ1"} \ * MERGEFORMAT}

14. Натиснете ALT + F9, за да затворите {хипервръзка {MERGEFIELD "< име на поле >"} \ * MERGEFORMAT} код на поле.

15. Поставете точката на вмъкване в началото на "грешка! Невалидна хипервръзка"текст и замени текст с хипервръзка текст, който искате да се появи. Например заменя текста с текст, като Щракнете тук.

    Важно: Уверете се, че не изтриете цялото поле.

16. Изберете текста, който въведохте в стъпка 15. В списъка стил щракнете върху хипервръзката.

17. В съветника за циркулярни документи щракнете върху напреди следвайте останалите стъпки на съветника за циркулярни документи да завършите процеса на циркулярни документи.

Метод 2: Създаване на макрос, който динамично променя текста

Microsoft предоставя примери само за илюстративни цели без изрични или подразбиращи се. Това включва, но не е ограничено до, подразбиращи се гаранции за продаваемост или годност за определена цел. Тази статия се предполага, че сте запознати с демонстрирания език за програмиране и инструментите, които се използват за създаване и процедури за отстраняване на грешки. Инженерите на поддръжката на Microsoft могат да помогнат с обяснение на функциите на конкретна процедура, но няма да могат да модифицират тези примери с цел осигуряване на допълнителна функционалност или създаване на процедури за удовлетворение на конкретните ви изисквания. Създаване на макрос, ако искате да променяте динамично текста във вашите циркулярни имейл съобщения. След като изпълните тези стъпки, хипервръзката показва текста, който е базиран на URL адреса на източника на данни. За да направите това, изпълнете следните стъпки:

1. Следвайте стъпките в "метод 1: Добавяне на поле с хипервръзка около циркулярните документи поле."

2. В менюто инструменти посочете макроси след това щракнете върху Редактор за Visual Basic.

3. Натиснете F7. Появява се прозорецът на код.

4. Копирайте и поставете следния код в прозореца на кода:

   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. В менюто инструменти посочете макроси след това щракнете върху макроси.

6. Щракнете върху MergeToEmailи след това щракнете върху изпълнение.

Забележка За всеки имейл съобщение, които изпращате с помощта на този макрос се показва предупредително съобщение от Microsoft Outlook. За повече информация относно този проблем щракнете върху следния номер на статия в базата знания на Microsoft:

290498 получавате предупредително съобщение, когато използвате добавката за външни или потребителско решение в Outlook 2002