4 greiti būdai, kaip „Word“ paversti horizontalius tekstus į vertikalius ir atvirkščiai

Šiame straipsnyje norėtume parodyti jums 4 greitus ir paprastus būdus, kaip konvertuoti „Word“ dokumento horizontalųjį ir vertikalųjį tekstą.

Kartais mes tikriausiai išdėstysime tekstus savo dokumente horizontaliai arba vertikaliai. Tada yra galimybė paversti horizontalų tekstą vertikaliu. Vėl surinkti visą informaciją būtų daug laiko ir kantrybės.

Todėl norime jums pasiūlyti 4 būdus, kaip pakeisti horizontalų tekstą į vertikalų ir atvirkščiai, pvz., toliau:

1 atvejis: vertikalius tekstus konvertuokite į horizontalius tekstus

Visų pirma, yra 2 būdai, kaip pakeisti vertikalius ir horizontalius tekstus.

1 būdas: naudokite funkciją „Pakeisti“.

1. Pirmiausia pasirinkite tikslinį tekstą.
2. Tada spustelėkite skirtuką „Pagrindinis“.
3. Tada eikite į grupę „Redagavimas“ ir spustelėkite parinktį „Pakeisti“. Arba galite paspausti „Ctrl + H“, kad atidarytumėte dialogo langą „Rasti ir pakeisti“.
4. Dabar užveskite žymeklį ties teksto laukeliu „Rasti ką“, įveskite „^p“.
5. Ir teksto laukelyje „Pakeisti į“ įveskite tarpą.
6. Tada tiesiog spustelėkite „Pakeisti viską“.
7. Atsiras dialogo langas, tiesiog spustelėkite „Taip“.

2 būdas: paleiskite makrokomandą

1. Pirmiausia spustelėkite skirtuką „Kūrėjas“.
2. Tada spustelėkite „Visual Basic“, kad paleistumėte VBA redaktorių. Kitas būdas yra paspausti „Alt + F11“.
3. Tada spustelėkite „Įprastas projektas“.
4. Ir spustelėkite „Įterpti“.
5. Pasirinkite „Modulis“, kad sukurtumėte naują modulį įprastame projekte.
6. Tada dukart spustelėkite modulį, kad atidarytumėte redagavimo erdvę.
7. Įklijuokite šiuos kodus:

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

8. Galiausiai spustelėkite „Vykdyti“.

2 atvejis: konvertuokite horizontalius tekstus į vertikalius tekstus

1 būdas: vėl pasirinkite funkciją „Pakeisti“.

1. Pirmiausia pakartokite pirmuosius 3 veiksmus, nurodytus 1 atvejo 1 metode.
2. Tačiau šį kartą dialogo lange „Rasti ir pakeisti“ įveskite tarpą teksto laukelyje „Rasti ką“ ir „^p“ lauke „Pakeisti į“.
3. Tada spustelėkite „Pakeisti viską“.

2 būdas: paleiskite makrokomandą

1. Panašiai atlikite pirmuosius 6 2 atvejo 1 metodo veiksmus.
2. Ir šį kartą įklijuokite toliau nurodytus kodus:

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

3. Nepamirškite spustelėti „Vykdyti“.

Gaukite savo Lost File

Kadangi šiais laikais dirbdami nuolat susiduriame su skaitmeniniais įrenginiais, taip pat susiduriame su rizika prarasti svarbią informaciją. Norint to išvengti, atsarginių kopijų kūrimas yra puikus sprendimas. Tačiau atsarginių kopijų kūrimas reikalauja kasdieninio atkaklumo. Laikui bėgant jūsų pasiryžimas kurti atsargines failų kopijas gali išnykti į kasdienio gyvenimo foną. Ir niekas nėra sidabrinė kulka, net atsarginės kopijos. Todėl jums reikės a sugadintas Word dokumentų atkūrimo įrankis.

Autoriaus įvadas:

Vera Chen yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant sugadintas xlsx remonto įrankis bei pdf programinės įrangos gaminių taisymas. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com