2 Χρήσιμες μέθοδοι για την αντικατάσταση του χρώματος επισήμανσης στο έγγραφο του Word

Σε αυτό το άρθρο, είμαστε στην ευχάριστη θέση να σας δείξουμε 2 χρήσιμες μεθόδους για να αντικαταστήσετε το χρώμα επισήμανσης στο έγγραφο του Word.

Μερικές φορές μπορεί να επισημάνετε διαφορετικά περιεχόμενα με διαφορετικά χρώματα. Αλλά σε αντίθεση με το χρώμα της γραμματοσειράς, δεν μπορείτε να χρησιμοποιήσετε το "Εύρεση και αντικατάσταση" για να βρείτε κείμενα σε ένα συγκεκριμένο χρώμα επισήμανσης και να το αντικαταστήσετε με ένα άλλο.

Επομένως, θα χρειαστούμε κάποιες λύσεις. Ακολουθούν 2 τρόποι διαθέσιμοι για διαφορετικές περιπτώσεις.

Μέθοδος 1: Αντικαταστήστε όλα τα χρώματα επισήμανσης με το ίδιο

Το χρώμα επισήμανσης που σχετίζεται με το παράθυρο διαλόγου "Εύρεση και αντικατάσταση" είναι το τρέχον που επιλέγεται στο εικονίδιο επισήμανσης.

1. Πρώτα απ 'όλα, στην καρτέλα "Αρχική σελίδα" και στην ομάδα "Γραμματοσειρά", κάντε κλικ στο αναπτυσσόμενο κουμπί στην εντολή "Χρώμα επισήμανσης κειμένου". Επιλέξτε ένα χρώμα στο οποίο θέλετε να αλλάξετε όλα τα χρώματα επισήμανσης. Για παράδειγμα, επιλέγουμε "Bright Green" εδώ.
2. Στη συνέχεια, πατήστε "Ctrl + H" για να ενεργοποιήσετε το παράθυρο διαλόγου "Εύρεση και αντικατάσταση".
3. Τοποθετήστε τον κέρσορα στο πλαίσιο κειμένου "Εύρεση τι".
4. Κάντε κλικ στο "Περισσότερα" για να εμφανίσετε περισσότερες επιλογές και κάντε κλικ στο "Μορφή".
5. Και επιλέξτε "Επισήμανση".
6. Στη συνέχεια, τοποθετήστε τον κέρσορα στο πλαίσιο "Αντικατάσταση με" και επαναλάβετε τα βήματα 4 και 5.
7. Τέλος, κάντε κλικ στο "Αντικατάσταση όλων".

Τώρα έχετε αντικαταστήσει όλα τα έντονα χρώματα με το φωτεινό πράσινο.

Μέθοδος 2: Αντικαταστήστε ένα συγκεκριμένο χρώμα επισήμανσης με ένα άλλο

Για την ολοκλήρωση αυτής της εργασίας, απαιτείται μακροεντολή.

1. Πρώτα απ 'όλα, πατήστε "Alt + F11" για να ανοίξετε τον επεξεργαστή VBA.
2. Στη συνέχεια, κάντε κλικ στο "Κανονικό" έργο στην αριστερή στήλη.
3. Στη συνέχεια, κάντε κλικ στην καρτέλα "Εισαγωγή" στη γραμμή μενού.
4. Και επιλέξτε "Module" σε αυτό το αναπτυσσόμενο μενού.
5. Ανοίξτε τη νέα λειτουργική μονάδα με διπλό κλικ.
6. Τώρα επικολλήστε τους ακόλουθους κωδικούς:

Sub ReplaceOneHighlightColorToAnother()
  Dim strFindColor As String
  Dim strReplaceColor As String
  Dim objDoc As Document
  Dim objRange As Range
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
 
  strFindColor = InputBox("Specify a color (enter the value):", "Specify Highlight Color")
  strReplaceColor = InputBox("Specify a new color (enter the value):", "New Highlight Color")
 
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .Highlight = True
 
      Do While .Execute
        If Selection.Range.HighlightColorIndex = strFindColor Then
          Set objRange = Selection.Range
          objRange.HighlightColorIndex = strReplaceColor
          Selection.Collapse wdCollapseEnd
        End If
      Loop
    End With
  End With
 
  Application.ScreenUpdating = True
End Sub

7. Στη συνέχεια κάντε κλικ στο κουμπί "Εκτέλεση" ή πατήστε "F5".
8. Στη συνέχεια, στο πλαίσιο "Καθορισμός χρώματος επισήμανσης", εισαγάγετε μια τιμή που αντιπροσωπεύει το χρώμα που θα αντικατασταθεί. Για να λάβετε την αντίστοιχη τιμή ενός συγκεκριμένου χρώματος, μπορείτε να επισκεφθείτε αυτόν τον σύνδεσμο: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColorIndex
9. Για παράδειγμα, εάν θέλουμε να αντικαταστήσουμε το κίτρινο χρώμα με έντονο πράσινο, εισάγουμε το «7» στο πλαίσιο «Καθορισμός χρώματος επισήμανσης» και κάντε κλικ στο «OK».
10. Στη συνέχεια, στο πλαίσιο "New Highlight Color", εισαγάγετε μια τιμή του νέου χρώματος και κάντε κλικ στο "OK".

Εδώ είναι το πιθανό αποτέλεσμα της αντικατάστασης κίτρινου με ανοιχτό πράσινο.

Αποφύγετε την καταστροφή απώλειας δεδομένων

Το Word είναι ένας πολύ καλός βοηθός στην καθημερινή μας εργασία. Επομένως, δεν είναι δύσκολο να φανταστεί κανείς την καταστροφή που μπορεί να φέρει όταν καταρρεύσει. Για να αποφύγετε την απώλεια κρίσιμων δεδομένων, μπορείτε να κρατήσετε ένα Επιδιόρθωση λέξεων εργαλείο εκ των προτέρων. Με ένα τέτοιο βοηθητικό πρόγραμμα, δεν πρέπει να ανησυχείτε για την απώλεια δεδομένων.

Εισαγωγή συγγραφέα:

Η Vera Chen είναι ειδικός ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων κατεστραμμένο xlsx και pdf επισκευή προϊόντων λογισμικού. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com