4 snabba sätt att konvertera horisontella texter till vertikala och vice versa i Word

I den här artikeln vill vi visa dig med fyra snabba och enkla sätt att konvertera mellan horisontella och vertikala texter i ditt Word-dokument.

Ibland ordnar vi sannolikt texter i horisontellt eller vertikalt i vårt dokument. Då finns det chanserna att konvertera en horisontell text till en vertikal. Det skulle vara tidskrävande och tålamod att åter skriva all information igen.

Därför vill vi erbjuda dig fyra sätt att ändra en horisontell text till en vertikal och vice versa, såsom nedan:

Fall 1: Konvertera vertikala texter till horisontella texter

Först och främst finns det två metoder för att växla mellan vertikala och horisontella texter.

Metod 1: Använd funktionen "Ersätt"

1. Först, välj måltexten.
2. Klicka sedan på fliken "Hem".
3. Gå sedan till gruppen "Redigering" och klicka på "Ersätt". Eller så kan du trycka på "Ctrl + H" för att öppna dialogrutan "Sök och ersätt".
4. Placera nu markören vid textrutan "Hitta vad", ange "^ p".
5. Och skriv ett mellanslag i textrutan "Ersätt med".
6. Klicka sedan bara på "Ersätt alla".
7. Det kommer att dyka upp en dialogruta, klicka bara på “Ja”.

Metod 2: Kör en makro

1. Klicka först på fliken "Utvecklare".
2. Klicka sedan på “Visual Basic” för att utlösa VBA-redigeraren. Det alternativa sättet är att trycka på "Alt + F11".
3. Klicka sedan på “Normal” -projekt.
4. Och klicka på "Infoga".
5. Välj ”Modul” för att skapa en ny modul i det vanliga projektet.
6. Nästa dubbelklicka på modulen för att öppna redigeringsutrymmet.
7. Klistra in följande koder där:

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. Slutligen klickar du på "Kör".

Fall 2: Konvertera horisontella texter till vertikala texter

Metod 1: Gå med “Ersätt” -funktionen igen

1. Till att börja med, upprepa de första 3 stegen i metod 1 i fall 1.
2. Men den här gången, i dialogrutan "Sök och ersätt", anger du ett mellanslag i textrutan "Hitta vad" och "^ p" i "Ersätt med" -rutan.
3. Klicka sedan på "Ersätt alla".

Metod 2: Kör en makro

1. Följ också de första 6 stegen i metod 2 i fall 1.
2. Och den här gången klistrar du in bälgkoderna istället:

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. Kom ihåg att klicka på "Kör".

Hämta din Lost File

Eftersom vi måste hantera digitala enheter hela tiden i nuvarande arbete står vi också inför risken att förlora kritisk information. För att förhindra det är säkerhetskopiering en utmärkt lösning. Säkerhetskopiering kräver dock en daglig uthållighet. Med tiden går din upplösning att säkerhetskopiera filer att blekna in i vardagen. Och ingenting är en silverkula, till och med säkerhetskopior. Därför behöver du en skadad Word-dokumentåterställningsverktyg.

Författarintroduktion:

Vera Chen är en dataåterställningsexpert i DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive skadad xlsx reparationsverktyg och pdf reparera programvaruprodukter. För mer information besök www.datanumen.com