Siêu liên kết trong trường nguồn dữ liệu được chuyển đổi thành văn bản đơn giản khi bạn thực hiện kết hợp thư e-mail trong định dạng HTML trong Word 2002 và Word 2003

Phương pháp 1: Thêm trường siêu liên kết xung quanh trường kết hợp thư

Thêm một siêu liên kết trường xung quanh trường kết hợp thư để tạo ra một siêu liên kết trong thư e-mail được kết hợp. Sau khi bạn làm theo các bước sau, siêu liên kết sẽ hiển thị cùng văn bản trong tất cả các tin nhắn e-mail. Ngoài ra, các siêu liên kết kết nối với URL nguồn dữ liệu chính xác. Để thực hiện việc này, hãy làm theo các bước sau:

1. Khởi động Word và mở tài liệu mà bạn muốn nhập e-mail.

2. Trên menu công cụ , trỏ chuột vào chữ cái và thưvà bấm kết hợp thư. Thuật sĩ trộn thư xuất hiện.

3. Trong chọn loại tài liệu, bấm vào Thư E-mailvà sau đó nhấp vào tiếp theo.

4. Trong chọn tài liệu bắt đầu, bấm sử dụng các tài liệu hiện tạivà sau đó nhấp vào tiếp theo.

5. Trong chọn người nhận, chọn người nhận mà bạn muốn sử dụng, và sau đó nhấp vào tiếp theo.

6. Đặt điểm chèn nơi bạn muốn liên kết xuất hiện trong thư email.

7. Trên menu Chèn, bấm vào Trường.

8. Trong danh sách tên trường , nhấp vào siêu liên kết, và sau đó bấm OK. Văn bản "lỗi. Liên kết tham chiếu không hợp lệ"xuất hiện trong tài liệu.

9. Nhấn ALT + F9 để mở các {siêu liên kết \ * MERGEFORMAT} trường mã.

10. Đặt điểm chèn sau siêu liên kết và sau đó thêm khoảng trắng.

11. Trên menu Chèn, bấm vào Trường.

12. Trong danh sách tên trường , nhấp vào MergeField.

13. Trong hộp văn bản tên trường , nhập tên trường nguồn dữ liệu chứa các siêu liên kết, và sau đó bấm OK. Ví dụ: nếu tên trường dữ liệu nguồn là "Địa chỉ 1", mã trường xuất hiện như sau:

    {Siêu liên kết {MERGEFIELD "Địa chỉ 1"} \ * MERGEFORMAT}

14. Nhấn ALT + F9 để đóng các {siêu liên kết {MERGEFIELD "< tên trường >"} \ * MERGEFORMAT} trường mã.

15. Đặt điểm chèn đầu "lỗi. Văn bản liên kết tham chiếu không hợp lệ", và ghi đè văn bản bằng văn bản siêu liên kết mà bạn muốn xuất hiện. Ví dụ: ghi đè văn bản bằng văn bản như CLICK HERE.

    Quan trọng Đảm bảo rằng bạn không xoá toàn bộ trường.

16. Chọn văn bản mà bạn đã gõ trong bước 15. Trong danh sách Style , nhấp vào siêu liên kết.

17. Trong thuật sỹ kết hợp thư, bấm tiếp theo, và sau đó làm theo các bước còn lại trong thuật sĩ kết hợp thư để hoàn tất quá trình kết hợp thư.

Phương pháp 2: Tạo một macro tự động sửa đổi văn bản siêu liên kết

Microsoft cung cấp mô hình lập trình để minh hoạ, không bảo hành hoặc rõ ràng hay ngụ ý. Điều này bao gồm, nhưng không giới hạn ở các bảo đảm cho một mục đích cụ thể hoặc sự. Bài viết này giả định rằng bạn đã quen với ngôn ngữ lập trình đang được giải thích và các công cụ được sử dụng để tạo và quy trình gỡ lỗi. Các kỹ sư hỗ trợ Microsoft có thể giúp giải thích các chức năng của một quy trình cụ thể, nhưng chúng sẽ không sửa đổi các ví dụ để cung cấp thêm chức năng hoặc xây dựng quy trình nhằm đáp ứng các yêu cầu cụ thể của bạn. Tạo một macro nếu bạn muốn tự động thay đổi văn bản siêu liên kết trong e-mail của bạn được kết hợp. Sau khi bạn làm theo các bước sau, siêu liên kết Hiển thị văn bản dựa trên URL trong nguồn dữ liệu. Để thực hiện việc này, hãy làm theo các bước sau:

1. Làm theo các bước trong "phương pháp 1: thêm trường siêu liên kết xung quanh trường kết hợp thư."

2. Trên menu Công cụ , trỏ tới Macro, và sau đó bấm vào Visual Basic Editor.

3. Nhấn F7. Cửa sổ mã xuất hiện.

4. Sao chép và dán mã sau vào cửa sổ mã:

   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. Trên menu công cụ , trỏ tới Macrovà sau đó bấm macro.

6. Bấm MergeToEmailvà sau đó bấm chạy.

Lưu ý Đối với mỗi tin nhắn e-mail bạn gửi bằng cách sử dụng macro này, một thông báo cảnh báo từ Microsoft Outlook xuất hiện. Để biết thêm thông tin về hành vi này, nhấp vào số bài viết sau để xem bài viết trong cơ sở kiến thức Microsoft:

290498 bạn nhận được thông báo cảnh báo khi bạn sử dụng một bên thứ ba add-in hoặc giải pháp tuỳ chỉnh trong Outlook 2002