Υπερ-συνδέσεις σε πεδία του αρχείου προέλευσης δεδομένων μετατρέπονται σε απλό κείμενο όταν εκτελείτε συγχώνευση αλληλογραφίας σε μηνύματα ηλεκτρονικού ταχυδρομείου σε μορφή HTML στο Word 2002 και Word 2003

Μέθοδος 1: Προσθέστε ένα πεδίο υπερ-σύνδεσης γύρω από το πεδίο της συγχώνευσης αλληλογραφίας

Προσθέστε ένα πεδίο υπερ-σύνδεσης γύρω από το πεδίο της συγχώνευσης αλληλογραφίας για να δημιουργήσετε μια υπερ-σύνδεση με τα συγχωνευμένα μηνύματα ηλεκτρονικού ταχυδρομείου. Αφού ακολουθήσετε αυτά τα βήματα, η υπερ-σύνδεση εμφανίζει το ίδιο κείμενο σε όλα τα μηνύματα ηλεκτρονικού ταχυδρομείου. Επιπλέον, η υπερ-σύνδεση συνδέεται με τη διεύθυνση URL της προέλευσης σωστά δεδομένα. Για να το κάνετε αυτό, ακολουθήστε τα εξής βήματα:

1. Ξεκινήστε το Word και ανοίξτε το έγγραφο που θέλετε να συγχωνεύσετε σε μήνυμα ηλεκτρονικού ταχυδρομείου.

2. Στο μενού Εργαλεία , επιλέξτε Επιστολές και στοιχεία αλληλογραφίαςκαι, στη συνέχεια, κάντε κλικ στο κουμπί Συγχώνευση αλληλογραφίας. Εμφανίζεται ο Οδηγός συγχώνευσης αλληλογραφίας.

3. Στην περιοχή Επιλογή τύπου εγγράφου, κάντε κλικ στο κουμπί μηνύματα ηλεκτρονικού ταχυδρομείουκαι, στη συνέχεια, κάντε κλικ στο κουμπί Επόμενο.

4. Στην περιοχή Επιλέξτε το έγγραφο έναρξης, κάντε κλικ στην επιλογή Χρήση τρέχοντος εγγράφουκαι, στη συνέχεια, κάντε κλικ στο κουμπί Επόμενο.

5. Στην περιοχή Επιλογή παραληπτών, επιλέξτε τους παραλήπτες που θέλετε να χρησιμοποιήσετε και, στη συνέχεια, κάντε κλικ στο κουμπί Επόμενο.

6. Τοποθετήστε το σημείο εισαγωγής όπου θέλετε η υπερ-σύνδεση να εμφανίζεται στο μήνυμα ηλεκτρονικού ταχυδρομείου.

7. Στο μενού " Εισαγωγή ", κάντε κλικ στο πεδίο.

8. Στη λίστα ονόματα πεδίων , κάντε κλικ στην υπερ-σύνδεσηκαι, στη συνέχεια, κάντε κλικ στο κουμπί OK. Το κείμενο "σφάλμα! Μη έγκυρη αναφορά υπερ-σύνδεσης"εμφανίζεται στο έγγραφο.

9. Πιέστε το συνδυασμό πλήκτρων ALT + F9 για να ανοίξετε το {υπερ-ΣΎΝΔΕΣΗΣ \ * MERGEFORMAT} το πεδίο Κωδικός.

10. Τοποθετήστε το σημείο εισαγωγής μετά την υπερ-ΣΎΝΔΕΣΗ και, στη συνέχεια, προσθέστε ένα κενό διάστημα.

11. Στο μενού " Εισαγωγή ", κάντε κλικ στο πεδίο.

12. Στη λίστα ονόματα πεδίων , κάντε κλικ στο πεδίο συγχώνευσης.

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