Πώς να μετατρέψετε όλες τις συνδεδεμένες εικόνες σε ενσωματωμένο έγγραφο του Word;
Όταν στέλνετε ένα έγγραφο του Word περιέχει συνδεδεμένες εικόνες σε άλλους, οι εικόνες θα λείπουν και θα εμφανίζονται στον υπολογιστή του παραλήπτη όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης. Πώς να μετατρέψετε όλες τις συνδεδεμένες εικόνες σε ενσωματωμένες ταυτόχρονα πριν από την αποστολή σε άλλους; Αυτό το άρθρο παρέχει μια μέθοδο VBA για την αντιμετώπισή της.
Μετατροπή συνδεδεμένων εικόνων σε ενσωματωμένο με κώδικα VBA
Μετατροπή συνδεδεμένων εικόνων σε ενσωματωμένο με κώδικα VBA
Εφαρμόστε τον παρακάτω κώδικα VBA για να μετατρέψετε όλες τις συνδεδεμένες εικόνες σε ένα έγγραφο σε ενσωματωμένο.
1. Ανοίξτε το έγγραφο του Word περιέχει συνδεδεμένες εικόνες που θα μετατρέψετε σε ενσωματωμένες εικόνες. Πάτα το άλλος + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης. Και στη συνέχεια αντιγράψτε κάτω από τον κώδικα VBA στο Μονάδα μέτρησης παράθυρο. Δείτε το στιγμιότυπο οθόνης:
Κωδικός VBA: Μετατροπή όλων των συνδεδεμένων εικόνων σε ενσωματωμένη ταυτόχρονα
Sub convert_all_inline_shapes()
'Updated by Extendoffice 20180906
Dim xIShape As InlineShape
For Each xIShape In ActiveDocument.InlineShapes
With xIShape
If .Type = wdInlineShapeLinkedPicture Then
.LinkFormat.SavePictureWithDocument = True
.LinkFormat.BreakLink
End If
End With
Next
End Sub3. Πάτα το F5 κλειδί για την εκτέλεση του κώδικα.
Στη συνέχεια, όλες οι συνδεδεμένες εικόνες στο τρέχον έγγραφο μετατρέπονται σε ενσωματωμένες ταυτόχρονα.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Kutools για το Word - Βελτιώστε την εμπειρία σας στο Word με το Over 100 Αξιοσημείωτα χαρακτηριστικά!
🤖 Kutools AI Assistant: Μεταμορφώστε το γραπτό σας με AI - Δημιουργία Περιεχομένου / Ξαναγράψτε το κείμενο / Συνοψίστε τα έγγραφα / Ζητήστε πληροφορίες με βάση το Έγγραφο, όλα μέσα στο Word
📘 Κυριαρχία εγγράφων: Διαίρεση σελίδων / Συγχώνευση εγγράφων / Εξαγωγή επιλογής σε διάφορες μορφές (PDF/TXT/DOC/HTML...) / Μαζική μετατροπή σε PDF / Εξαγωγή σελίδων ως εικόνες / Εκτύπωση πολλών αρχείων ταυτόχρονα...
✏ Επεξεργασία Περιεχομένων: Μαζική εύρεση και αντικατάσταση σε πολλά αρχεία / Αλλαγή μεγέθους όλων των εικόνων / Μεταφορά σειρών και στηλών πίνακα / Μετατροπή πίνακα σε κείμενο...
🧹 Καθαρισμός χωρίς κόπο: Σαρώστε μακριά Επιπλέον χώροι / Διακοπές ενότητας / Όλες οι κεφαλίδες / Κουτιά κειμένου / Υπερ-συνδέσεις / Για περισσότερα εργαλεία αφαίρεσης, κατευθυνθείτε στο δικό μας Κατάργηση ομάδας...
➕ Δημιουργικά ένθετα: Εισάγετε Χιλιάδες Διαχωριστές / Πλαίσια ελέγχου / Κουμπιά ραδιοφώνου / QR Code / barcode / Διαγώνιος γραμμικός πίνακας / Λεζάντα εξίσωσης / Λεζάντα εικόνας / Λεζάντα πίνακα / Πολλαπλές εικόνες / Ανακαλύψτε περισσότερα στο Εισαγωγή ομάδας...
🔍 Επιλογές Ακρίβειας: Επισήμανση συγκεκριμένες σελίδες / πίνακες / σχήματα / επικεφαλίδες παραγράφους / Βελτιώστε την πλοήγηση με περισσότερο Επιλέξτε χαρακτηριστικά...
⭐ Βελτιώσεις αστεριών: Πλοηγηθείτε γρήγορα σε οποιαδήποτε τοποθεσία / αυτόματη εισαγωγή επαναλαμβανόμενου κειμένου / εναλλαγή μεταξύ των παραθύρων εγγράφων / 11 Εργαλεία μετατροπής...
