În acest articol, am dori să vă demonstrăm 4 moduri rapide și ușoare de a converti între texte orizontale și verticale în documentul dvs. Word.
Din când în când, este posibil să aranjam textele pe orizontală sau verticală în documentul nostru. Apoi există șansele de a converti un text orizontal în unul vertical. Ar fi consumator de timp și de răbdare să reintroduceți toate informațiile din nou.
Prin urmare, dorim să vă oferim 4 moduri de a schimba un text orizontal cu unul vertical și invers, cum ar fi mai jos:
Cazul 1: convertiți textele verticale în texte orizontale
În primul rând, există 2 metode de a schimba între textele verticale și orizontale.
Metoda 1: Utilizați funcția „Înlocuire”.
- În primul rând, selectați textul țintă.
- Apoi faceți clic pe fila „Acasă”.
- Apoi accesați grupul „Editare” și faceți clic pe opțiunea „Înlocuire”. Sau puteți apăsa „Ctrl+H” pentru a deschide caseta de dialog „Găsiți și înlocuiți”.

- Acum plasați cursorul în caseta de text „Găsiți ce”, introduceți „^p”.
- Și în caseta de text „Înlocuiește cu”, tastați un spațiu.
- Apoi faceți clic pe „Înlocuiește tot”.
- Va apărea o casetă de dialog, doar faceți clic pe „Da”.
Metoda 2: Executați o macrocomandă
- În primul rând, faceți clic pe fila „Dezvoltator”.
- Apoi faceți clic pe „Visual Basic” pentru a declanșa editorul VBA. O modalitate alternativă este să apăsați „Alt+ F11”.
- Apoi faceți clic pe proiect „Normal”.
- Și faceți clic pe „Inserați”.
- Alegeți „Modul” pentru a crea un nou modul în proiectul normal.
- Apoi faceți dublu clic pe modul pentru a deschide spațiul de editare.
- Lipiți acolo următoarele coduri:
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
- În cele din urmă, faceți clic pe „Run”.
Cazul 2: convertiți texte orizontale în texte verticale
Metoda 1: mergeți cu funcția „Înlocuire” din nou
- Pentru început, repetați primii 3 pași din metoda 1 a cazului 1.
- Cu toate acestea, de data aceasta, în caseta de dialog „Găsiți și înlocuiți”, introduceți un spațiu în caseta de text „Găsiți ce” și „^p” în caseta „Înlocuiți cu”.
- Apoi faceți clic pe „Înlocuiește tot”.
Metoda 2: Executați o macrocomandă
- În mod similar, urmați primii 6 pași din metoda 2 din cazul 1.
- Și de data aceasta lipiți codurile de mai jos:
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
- Nu uitați să faceți clic pe „Run”.
Preluați-vă Lost File
Deoarece avem de a face cu dispozitive digitale tot timpul în munca de astăzi, ne confruntăm și cu riscul de a pierde informații critice. Pentru a preveni acest lucru, efectuarea de copii de siguranță este o soluție excelentă. Cu toate acestea, backupul necesită o persistență de zi cu zi. Pe măsură ce trece timpul, hotărârea dvs. de a face copii de rezervă ale fișierelor poate trece în fundalul vieții de zi cu zi. Și nimic nu este un glonț de argint, chiar și copii de rezervă. Prin urmare, veți avea nevoie de un instrument de recuperare document Word corupt.
Introducerea autorului:
Vera Chen este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv instrument de reparare xlsx deteriorat și pdf repararea produselor software. Pentru mai multe informații vizitați www.datanumen.com






