Σε αυτό το άρθρο, θέλουμε να σας δείξουμε 2 γρήγορες και εύχρηστες μεθόδους για την εξαγωγή κειμένων από πλαίσια κειμένου στο έγγραφο του Word.
Από καιρό σε καιρό, μπορούμε να λάβουμε ένα αρχείο Word που περιέχει μεγάλο αριθμό πλαισίων κειμένου. Συνήθως, θα υπάρχουν κείμενα ή σχετικά περιεχόμενα μέσα σε αυτά τα πλαίσια. Τότε μπορεί να υπάρξει η ανάγκη να μπουν μόνο τα κείμενα μέσα αντί να διατηρηθεί ολόκληρο το πλαίσιο κειμένου.
Σίγουρα, είναι γρήγορο να ανακτήσετε λέξεις μέσα σε ένα μόνο πλαίσιο κειμένου απλά αντιγράφοντας το κείμενο και επικολλώντας το κάπου αλλού. Ωστόσο, όταν πρόκειται για εκατοντάδες από αυτά, καλύτερα να μάθουμε μερικές γρήγορες συμβουλές για να ολοκληρώσουμε τη δουλειά.
Μέθοδος 1: Χρησιμοποιήστε το "Παράθυρο επιλογής"
- Πρώτα απ 'όλα, κάντε κλικ στην καρτέλα "Αρχική".
- Στη συνέχεια, κάντε κλικ στο εικονίδιο "Επιλογή" στην ομάδα "Επεξεργασία".
- Στη συνέχεια, στο αναπτυσσόμενο μενού, επιλέξτε "Παράθυρο επιλογής".
- Τώρα, στη δεξιά πλευρά της οθόνης, μπορείτε να δείτε όλα τα πλαίσια κειμένου ορατά στο παράθυρο.
- Πατήστε "Ctrl" και κάντε κλικ σε αυτά τα ονόματα πλαισίων κειμένου στο παράθυρο ένα προς ένα για να τα επιλέξετε όλα.
- Και μετακινηθείτε για να τοποθετήσετε τον κέρσορα σε μία από τις γραμμές πλαισίου και κάντε δεξί κλικ.
- Στην επιλογή λίστας, κάντε κλικ στο «Αντιγραφή». Τώρα, εάν δεν χρειάζεστε πλέον αυτά τα πλαίσια, απλώς πατήστε "Διαγραφή".
- Στη συνέχεια, κάντε κλικ στο κουμπί "Έναρξη" για να δείτε το μενού των Windows.
- Επιλέξτε "WordPad" και ανοίξτε το.
- Στη συνέχεια, κάντε κλικ στο «Επικόλληση» για να λάβετε όλα τα κείμενα από τα πλαίσια κειμένου.
- Στη συνέχεια, επιλέξτε όλα τα κείμενα και κάντε δεξί κλικ για να επιλέξετε «Αντιγραφή».
- Τώρα ανοίξτε ένα νέο έγγραφο του Word και κάντε δεξί κλικ για να επιλέξετε "Keep Text Only" για να λάβετε το κείμενο.
Μέθοδος 2: Χρησιμοποιήστε κωδικούς VBA
Όπως μπορείτε να δείτε, ακόμη και με την πρώτη μέθοδο, δεν μπορείτε να αποφύγετε την επιλογή όλων των πλαισίων κειμένου. Σε περίπτωση που κάποιοι από εσάς απλώς μισείτε μια τέτοια εργασία, εδώ είμαστε να σας προσφέρουμε τον τρόπο να εκτελέσετε μια μακροεντολή. Με τη μέθοδο 2, μπορείτε να εξαγάγετε όλα τα κείμενα με μία κίνηση και να διαγράψετε τα πλαίσια κειμένου.
- Αρχικά, πατήστε "Alt + F11" για να ανοίξετε το πρόγραμμα επεξεργασίας VBA.
- Δεύτερον, κάντε κλικ στο «Κανονικό» και μετά στο «Εισαγωγή».
- Στη συνέχεια, επιλέξτε "Module" για να εισαγάγετε μια νέα.
- Στη συνέχεια, κάντε διπλό κλικ στο όνομα της μονάδας για να ανοίξετε την περιοχή επεξεργασίας.
- Επικολλήστε τους παρακάτω κωδικούς και κάντε κλικ στο «Εκτέλεση»:
Sub DeleteTextBoxesAndExtractTheText()
Dim nNumber As Integer
Dim strText As String
' Delete all textboxes and extract the text from them
With ActiveDocument
For nNumber = .Shapes.Count To 1 Step -1
If .Shapes(nNumber).Type = msoTextBox Then
strText=strText& .Shapes(nNumber).TextFrame.TextRange.Text & vbCr
.Shapes(nNumber).Delete
End If
Next
End With
' Open a new document to paste the text from textboxes.
If strText <> "" Then
Documents.Add Template:="Normal"
ActiveDocument.Range.Text = strText
Else
MsgBox ("There is no textbox.")
End If
End Sub
Εδώ είναι τι είναι πιθανό να πάρετε:
Αντιμετωπίστε τα κατεστραμμένα αρχεία του Word
Το Word είναι επιρρεπές σε λάθη και ως εκ τούτου συχνά θύμα διαφθοράς. Επομένως, πρέπει να διαχειρίζεστε τα έγγραφά σας σωστά για να τα προστατεύσετε από ζημιές. Από τη στιγμή που θα διαφθαρούν, θα αντιμετωπίσετε τον κίνδυνο να τα χάσετε οριστικά. Τότε θα πρέπει να χρησιμοποιήσετε το κατεστραμμένο εργαλείο ανάκτησης δεδομένων του Word.
Εισαγωγή συγγραφέα:
Η Vera Chen είναι ειδικός ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων Εργαλείο ανάκτησης σφαλμάτων αρχείων Excel και pdf επισκευή προϊόντων λογισμικού. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com