Πώς να τολμήσετε όλες τις παρουσίες της ίδιας λέξης σε ένα έγγραφο του Word;
Εάν υπάρχουν πολλά κείμενα "προοπτικής" στο αρχείο Word, τώρα πρέπει να μορφοποιήσετε όλα τα κείμενα "προοπτικής" ως τολμηρά. Πώς θα μπορούσατε να τολμήσετε όλες τις παρουσίες της ίδιας λέξης σε ένα μεγάλο έγγραφο του Word το συντομότερο δυνατό;
Έντονη γραφή όλων των παρουσιών της ίδιας λέξης σε ένα έγγραφο του Word με κωδικό VBA
Έντονη γραφή όλων των παρουσιών της ίδιας λέξης σε ένα έγγραφο του Word με κωδικό VBA
Ο ακόλουθος κώδικας VBA μπορεί να σας βοηθήσει να τολμήσετε γρήγορα και εύκολα όλες τις εμφανίσεις μιας συγκεκριμένης λέξης, κάντε το ως εξής:
1. Κρατήστε πατημένο το ALT + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Και μετά, κάντε κλικ στο Κύριο θέμα > Μονάδα μέτρησης, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στην κενή κενή ενότητα:
Κωδικός VBA: Έντονα γράμματα όλων των παρουσιών της ίδιας λέξης
Sub BoldAll()
Dim xStr As String
xStr = InputBox("Please enter the word that you want to bold:", "KuTools for Word")
If Trim(xStr) = "" Then
MsgBox "Cann’t be empty!", vbInformation, "KuTools for Word"
End If
With ActiveDocument.Content.Find
.ClearFormatting
.Text = xStr
.Replacement.ClearFormatting
.Replacement.Font.Bold = True
.Replacement.Text = "^&"
.Wrap = wdFindStop
.Format = True
.Forward = True
.Execute Replace:=wdReplaceAll
End With
End Sub
3. Μετά την εισαγωγή του κωδικού και, στη συνέχεια, πατήστε F5 κλειδί για να το εκτελέσετε και εμφανίζεται ένα παράθυρο διαλόγου για να σας υπενθυμίσει ότι εισάγετε τη λέξη που θέλετε να τολμήσετε, δείτε το στιγμιότυπο οθόνης:
4. Και μετά, κάντε κλικ στο OK κουμπί και όλες οι συγκεκριμένες λέξεις έχουν μορφοποιηθεί με έντονη γραφή ταυτόχρονα.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Kutools για το Word - Βελτιώστε την εμπειρία σας στο Word με το Over 100 Αξιοσημείωτα χαρακτηριστικά!
🤖 Kutools AI Assistant: Μεταμορφώστε το γραπτό σας με AI - Δημιουργία Περιεχομένου / Ξαναγράψτε το κείμενο / Συνοψίστε τα έγγραφα / Ζητήστε πληροφορίες με βάση το Έγγραφο, όλα μέσα στο Word
📘 Κυριαρχία εγγράφων: Διαίρεση σελίδων / Συγχώνευση εγγράφων / Εξαγωγή επιλογής σε διάφορες μορφές (PDF/TXT/DOC/HTML...) / Μαζική μετατροπή σε PDF / Εξαγωγή σελίδων ως εικόνες / Εκτύπωση πολλών αρχείων ταυτόχρονα...
✏ Επεξεργασία Περιεχομένων: Μαζική εύρεση και αντικατάσταση σε πολλά αρχεία / Αλλαγή μεγέθους όλων των εικόνων / Μεταφορά σειρών και στηλών πίνακα / Μετατροπή πίνακα σε κείμενο...
🧹 Καθαρισμός χωρίς κόπο: Σαρώστε μακριά Επιπλέον χώροι / Διακοπές ενότητας / Όλες οι κεφαλίδες / Κουτιά κειμένου / Υπερ-συνδέσεις / Για περισσότερα εργαλεία αφαίρεσης, κατευθυνθείτε στο δικό μας Κατάργηση ομάδας...
➕ Δημιουργικά ένθετα: Εισάγετε Χιλιάδες Διαχωριστές / Πλαίσια ελέγχου / Κουμπιά ραδιοφώνου / QR Code / barcode / Διαγώνιος γραμμικός πίνακας / Λεζάντα εξίσωσης / Λεζάντα εικόνας / Λεζάντα πίνακα / Πολλαπλές εικόνες / Ανακαλύψτε περισσότερα στο Εισαγωγή ομάδας...
🔍 Επιλογές Ακρίβειας: Επισήμανση συγκεκριμένες σελίδες / πίνακες / σχήματα / επικεφαλίδες παραγράφους / Βελτιώστε την πλοήγηση με περισσότερο Επιλέξτε χαρακτηριστικά...
⭐ Βελτιώσεις αστεριών: Πλοηγηθείτε γρήγορα σε οποιαδήποτε τοποθεσία / αυτόματη εισαγωγή επαναλαμβανόμενου κειμένου / εναλλαγή μεταξύ των παραθύρων εγγράφων / 11 Εργαλεία μετατροπής...