Βρείτε και αντικαταστήστε κείμενα στο Word, στην κεφαλίδα και στο υποσέλιδο

Κανονικά, η λειτουργία Find & Replace μπορεί να βοηθήσει στην εύρεση και αντικατάσταση συγκεκριμένου κειμένου στο σώμα, την κεφαλίδα και το υποσέλιδο ενός εγγράφου Word ταυτόχρονα. Έχετε προσπαθήσει ποτέ να βρείτε και να αντικαταστήσετε κείμενα μόνο στην ενότητα κεφαλίδας και υποσέλιδου σε ένα έγγραφο του Word; Ή να βρείτε και να αντικαταστήσετε πολλά διαφορετικά κείμενα ταυτόχρονα σε ένα έγγραφο λέξεων ή σε πολλά έγγραφα; Αυτό το σεμινάριο δείχνει μερικές μεθόδους για την επίτευξή τους.

Βρείτε και αντικαταστήστε το ίδιο κείμενο στο έγγραφο του Word με τη δυνατότητα Εύρεση και αντικατάστασης
Βρείτε και αντικαταστήστε το ίδιο κείμενο μόνο στην ενότητα κεφαλίδας και υποσέλιδου με τον κωδικό VBA
Βρείτε και αντικαταστήστε διαφορετικά κείμενα ταυτόχρονα με ένα καταπληκτικό χαρακτηριστικό

Βρείτε και αντικαταστήστε το ίδιο κείμενο στο έγγραφο του Word με τη δυνατότητα Εύρεση και αντικατάστασης

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

1. Ανοίξτε το έγγραφο που περιέχει τις λέξεις που θέλετε να αντικαταστήσετε, πατήστε το Ctrl + H ταυτόχρονα για να ανοίξετε το Εύρεση και αντικατάσταση κουτί διαλόγου.

2. Στο Εύρεση και αντικατάσταση πλαίσιο διαλόγου, κάτω από το Αντικαταστήστε καρτέλα, εισαγάγετε το παλιό κείμενο και το νέο κείμενο ξεχωριστά στο βρείτε αυτό Και Replace με κουτιά και, στη συνέχεια, κάντε κλικ στο Αντικατάσταση όλων κουμπί. Δείτε το στιγμιότυπο οθόνης:

Σημείωση: Μπορείτε να κάνετε κλικ στο Περισσότερες κουμπί για να βρείτε περισσότερες επιλογές αναζήτησης όπως χρειάζεστε.

3. Στη συνέχεια, εμφανίζεται ένας διάλογος για να σας δείξει πόσες αντικαταστάσεις έχουν γίνει. Κάντε κλικ OK να τελειώσω.

Βρείτε και αντικαταστήστε το ίδιο κείμενο μόνο στην ενότητα κεφαλίδας και υποσέλιδου με τον κωδικό VBA

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

1. Ανοίξτε το έγγραφο που θα βρείτε και αντικαταστήστε το κείμενο στην κεφαλίδα και στο υποσέλιδο, πατήστε το άλλος + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης, και στη συνέχεια αντιγράψτε τον παρακάτω κώδικα VBA στο παράθυρο Module.

Κωδικός VBA: Εύρεση και αντικατάσταση κειμένου μόνο στην κεφαλίδα και στο υποσέλιδο

Sub FindAndReplaceOfHeaderAndFooter()
'Update by Extendoffice 20190805
    Dim xDoc As Document
    Dim xSelection As Selection
    Dim xSec As Section
    Dim xHeader As HeaderFooter
Dim xFooter As HeaderFooter
On Error Resume Next
    Set xDoc = Application.ActiveDocument
    For Each xSec In xDoc.Sections
        For Each xHeader In xSec.Headers
            xHeader.Range.Select
            Set xSelection = xDoc.Application.Selection
            With xSelection.Find
                .Text = "I've found header text" 'Enter the old header text here!
               .Replacement.Text = "I've found header text" 'Enter the new header text here!
                .Wrap = wdFindContinue
                .Execute Replace:=wdReplaceAll
            End With
        Next xHeader
        For Each xFooter In xSec.Footers
            xFooter.Range.Select
            Set xSelection = xDoc.Application.Selection
            With xSelection.Find
                .Text = "I've found footer text" 'Enter the old footer text here!
                .Replacement.Text = "I've found footer text" 'Enter the old footer text here!
                .Wrap = wdFindContinue
                .Execute Replace:=wdReplaceAll
            End With
        Next xFooter
    Next xSec
    xDoc.ActiveWindow.ActivePane.Close
    If xDoc.ActiveWindow.View.SplitSpecial = wdPaneNone Then
        xDoc.ActiveWindow.View.Type = wdPrintView
    Else
        xDoc.ActiveWindow.View.Type = wdPrintView
    End If
    xDoc.Activate
End Sub

Σημείωση: Στον κωδικό, αντικαταστήστε το "Εύρεση κειμένου κεφαλίδας" και το "Εύρεση κειμένου υποσέλιδου"Με τα κείμενα που θέλετε να βρείτε στην κεφαλίδα και στο υποσέλιδο. και αντικαταστήστε το "Βρήκα κείμενο κεφαλίδας"Και"Βρήκα κείμενο υποσέλιδου"Με το νέο κείμενο κεφαλίδας και κείμενο υποσέλιδου.

3. Πάτα το F5 κλειδί για την εκτέλεση του κώδικα. Στη συνέχεια, τα συγκεκριμένα κείμενα στην κεφαλίδα και το υποσέλιδο αντικαθίστανται με νέα κείμενα.

Βρείτε και αντικαταστήστε διαφορετικά κείμενα ταυτόχρονα με ένα καταπληκτικό χαρακτηριστικό

1. Εκκινήστε την εφαρμογή Microsoft Word, κάντε κλικ στο Kutools Plus > Μαζική εύρεση και αντικατάσταση.

2. Στο Μαζική εύρεση και αντικατάσταση παράθυρο, πρέπει να κάνετε τα εξής.

• 2.1 κάντε κλικ στο κουμπί> Προσθήκη αρχείου or Προσθήκη φακέλου για να προσθέσετε τα έγγραφα που χρειάζεστε για να βρείτε και να αντικαταστήσετε κείμενα μέσα.
  
• 2.2 Κάντε κλικ στο Πρόσθεσε γραμμή κουμπί για να εισαγάγετε τα πεδία εύρεσης και αντικατάστασης. Εάν θέλετε να βρείτε και να αντικαταστήσετε τρία διαφορετικά κείμενα ταυτόχρονα, δημιουργήστε τρεις σειρές.
• 2.3 Σε κάθε σειρά, εισαγάγετε τα υπάρχοντα κείμενα που θα αντικαταστήσετε με ένα νέο στο Εύρεση και στη συνέχεια εισαγάγετε το νέο κείμενο στο Αντικαταστήστε στήλη.
• 2.4 Προσδιορίστε το Τύπος αναζήτησης για κάθε σειρά.
• 2.5 Στο Βρείτε μέσα στήλη, επιλέξτε πού θα εφαρμόσετε την εύρεση και αντικατάσταση. Περιλαμβάνει Κύριο έγγραφο, επικεφαλίδα και Υποσέλιδο σε ΑΥΤΗΝ την ΕΝΟΤΗΤΑ. Μπορείτε να επιλέξετε ένα από αυτά, δύο από αυτά ή όλα ανάλογα με τις ανάγκες σας.
• 2.6. Κάντε κλικ στο κουμπί Αντικαταστήστε για να ξεκινήσει η λειτουργία. Δείτε το στιγμιότυπο οθόνης:

Στη συνέχεια, όλα τα συγκεκριμένα κείμενα αντικαθίστανται σε επιλεγμένα έγγραφα.

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

  Εάν θέλετε να έχετε μια δωρεάν δοκιμή (60-ημερών) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.

Σχετικά Άρθρα

---

Συνιστώμενα εργαλεία παραγωγικότητας του Word

 

Kutools For Word - Περισσότερες από 100 προηγμένες λειτουργίες για το Microsoft Word, εξοικονομήστε 50% χρόνο

• Περίπλοκες και επαναλαμβανόμενες λειτουργίες μπορούν να γίνουν μία φορά επεξεργασία σε δευτερόλεπτα.
• Εισαγάγετε πολλές εικόνες στους φακέλους στο έγγραφο του Word ταυτόχρονα.
• Συγχώνευση και συνδυασμός πολλαπλών αρχείων Word σε όλους τους φακέλους σε ένα με την επιθυμητή σειρά.
• Διαχωρίστε το τρέχον έγγραφο σε ξεχωριστά έγγραφα σύμφωνα με την επικεφαλίδα 1, αλλαγή ενότητας ή άλλα κριτήρια.
• Μετατροπή αρχείων μεταξύ Doc και Docx, Docx και PDF, συλλογή εργαλείων για κοινές μετατροπές και επιλογή, και ούτω καθεξής...

Δείτε Περισσότερα Κατεβάστε τώρα Αγορά