4 γρήγοροι τρόποι μετατροπής οριζόντιων κειμένων σε κατακόρυφα και αντίστροφα σε Word

Κοινή χρήση τώρα:

Σε αυτό το άρθρο, θα θέλαμε να σας δείξουμε με 4 γρήγορους και εύκολους τρόπους μετατροπής μεταξύ οριζόντιων και κάθετων κειμένων στο έγγραφο του Word.

Τώρα και μετά, είναι πιθανό να τακτοποιήσουμε κείμενα σε οριζόντια ή κατακόρυφα στο έγγραφό μας. Στη συνέχεια, υπάρχουν πιθανότητες μετατροπής ενός οριζόντιου κειμένου σε κατακόρυφο. Θα ήταν χρονοβόρο και θανατώθηκε η υπογραφή όλων των πληροφοριών ξανά.

Επομένως, θέλουμε να σας προσφέρουμε 4 τρόπους για να αλλάξετε ένα οριζόντιο κείμενο σε κάθετο και αντίστροφα, όπως παρακάτω:Κατεύθυνση κειμένου

Περίπτωση 1: Μετατροπή κάθετων κειμένων σε οριζόντια κείμενα

Πρώτα απ 'όλα, υπάρχουν 2 μέθοδοι εναλλαγής μεταξύ κάθετων και οριζόντιων κειμένων.

Μέθοδος 1: Χρησιμοποιήστε τη δυνατότητα "Αντικατάσταση"

  1. Αρχικά, επιλέξτε το κείμενο-στόχο.
  2. Στη συνέχεια, κάντε κλικ στην καρτέλα "Αρχική σελίδα".
  3. Στη συνέχεια, μεταβείτε στην ομάδα "Επεξεργασία" και κάντε κλικ στην επιλογή "Αντικατάσταση". Ή μπορείτε να πατήσετε "Ctrl + H" για να ανοίξετε το παράθυρο διαλόγου "Εύρεση και αντικατάσταση".Κάντε κλικ στο "Home" -> Κάντε κλικ στο "Replace"
  4. Τώρα τοποθετήστε τον κέρσορα στο πλαίσιο κειμένου "Εύρεση τι", πληκτρολογήστε "^ p".
  5. Και στο πλαίσιο κειμένου "Αντικατάσταση με", πληκτρολογήστε ένα κενό διάστημα.
  6. Στη συνέχεια, απλώς κάντε κλικ στο "Αντικατάσταση όλων".Πληκτρολογήστε "^ p" στο "Εύρεση τι" -> Εισαγάγετε ένα κενό στο "Αντικατάσταση με" Πλαίσιο -> Κάντε κλικ στο "Αντικατάσταση όλων"
  7. Θα εμφανιστεί ένα παράθυρο διαλόγου, απλώς κάντε κλικ στο "Ναι".Κάντε κλικ στο "Ναι"

Μέθοδος 2: Εκτέλεση μακροεντολής

  1. Αρχικά, κάντε κλικ στην καρτέλα "Προγραμματιστής".
  2. Στη συνέχεια, κάντε κλικ στο "Visual Basic" για να ενεργοποιήσετε το πρόγραμμα επεξεργασίας VBA. Ο εναλλακτικός τρόπος είναι να πατήσετε "Alt + F11".Κάντε κλικ στο "Προγραμματιστής" -> Κάντε κλικ στο "Visual Basic"
  3. Στη συνέχεια κάντε κλικ στο "Κανονικό" έργο.
  4. Και κάντε κλικ στο «Εισαγωγή».
  5. Επιλέξτε "Module" για να δημιουργήσετε μια νέα ενότητα στο κανονικό έργο.Κάντε κλικ στο "Normal" -> Κάντε κλικ στο "Insert" -> Κάντε κλικ στο "Module"
  6. Στη συνέχεια, κάντε διπλό κλικ στη λειτουργική μονάδα για να ανοίξετε το χώρο επεξεργασίας.
  7. Επικολλήστε τους ακόλουθους κωδικούς εκεί:
Sub ConvertVerticalToHorizontalList()
 
  With Selection.Find
    .Text = "^p"
    .Replacement.Text = " "
    .Forward = False
    .Wrap = wdFindStop
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
End Sub
  1. Τέλος, κάντε κλικ στο "Εκτέλεση".Επικόλληση κωδικών-> Κάντε κλικ στο "Εκτέλεση"

Περίπτωση 2: Μετατροπή οριζόντιων κειμένων σε κάθετα κείμενα

Μέθοδος 1: Πηγαίνετε ξανά με τη λειτουργία "Αντικατάσταση"

  1. Αρχικά, επαναλάβετε τα πρώτα 3 βήματα της μεθόδου 1 της περίπτωσης 1.
  2. Ωστόσο, αυτή τη φορά, στο παράθυρο διαλόγου "Εύρεση και αντικατάσταση", εισαγάγετε ένα κενό στο πλαίσιο κειμένου "Εύρεση τι" και "^ p" στο πλαίσιο "Αντικατάσταση με".
  3. Στη συνέχεια, κάντε κλικ στο "Αντικατάσταση όλων".Εισαγάγετε ένα κενό στο "Εύρεση τι" Πλαίσιο -> Εισαγάγετε "^ p" στο "Αντικατάσταση με" Πλαίσιο -> Κάντε κλικ στο "Αντικατάσταση όλων"

Μέθοδος 2: Εκτέλεση μακροεντολής

  1. Ομοίως, ακολουθήστε τα πρώτα 6 βήματα στη μέθοδο 2 της περίπτωσης 1.
  2. Και αυτή τη φορά επικολλήστε τους παρακάτω κωδικούς:
Sub ConvertHorizontalToVerticalList()

  With Selection.Find
    .Text = " "
    .Replacement.Text = "^p"
    .Forward = False
    .Wrap = wdFindStop
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
End Sub
  1. Θυμηθείτε να κάνετε κλικ στο "Εκτέλεση".Εισαγάγετε κωδικούς-> Κάντε κλικ στο "Εκτέλεση"

Ανακτήστε το L σαςost File

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

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

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

Κοινή χρήση τώρα:

Τα σχόλια είναι κλειστά.