Tässä artikkelissa esittelemme neljä nopeaa tapaa poistaa ei-toivotut sivunvaihdot Word-dokumentistasi.
Word lisää automaattisen sivunvaihdon, kun se siirtyy sivulta toiselle. Voit myös lisätä manuaalisen sivunvaihdon tekstialueen loppuun. Tällöin teksti alkaa seuraavan sivun yläreunasta. Katso ohjeet manuaalisen sivunvaihdon lisäämiseen tästä artikkelista: 5 tapaa lisätä sivunvaihdot nopeasti Word-asiakirjaasi
Sinun tulee kuitenkin ymmärtää, että automaattiset sivunvaihdot ovat näkymättömiä, eikä niitä siksi voi poistaa manuaalisesti. Mutta manuaalisesti lisätyt sivunvaihdot tekevät niin. Joten artikkelimme tarjoaa sinulle pääasiassa hyödyllisiä tapoja poistaa ei-toivotut manuaaliset sivunvaihdot Word-asiakirjassa. 
Tapa 1: Poista sivunvaihdot manuaalisesti
- Ensinnäkin, sinun on napsautettava "Näytä/piilota" -komentoa "Home"-välilehdellä paljastaaksesi kaikki piilotetut merkit ja symbolit asiakirjassa, jotta voit tarkastella sivunvaihtoa.
- Valitse seuraavaksi sivunvaihto ja paina "Poista" päästäksesi eroon siitä.
- Tai voit napsauttaa sivunvaihdon vasemmalla puolella ja painaa sitten "Poista".
Tapa 2: Käytä Etsi ja korvaa -ominaisuutta
- Aloita painamalla "Ctrl + H" käynnistääksesi "Etsi ja korvaa" -ruudun.
- Aseta sitten kohdistin "Etsi mitä" -tekstiruutuun ja napsauta "Lisää" -välilehteä.
- Napsauta seuraavaksi "Erikois" ja valitse "Manuaalinen sivunvaihto" kyseisestä valikosta.
- Lopuksi jätä "Korvaa" -ruutu tyhjäksi ja napsauta "Korvaa kaikki" poistaaksesi jokaisen sivunvaihdon asiakirjasta.
Tapa 3: Suorita makro poistaaksesi kaikki sivunvaihdot asiakirjasta
- Ensinnäkin käynnistä VBA-editori Wordissa painamalla "Alt + F11".
- Napsauta sitten vasemmassa sarakkeessa “Normaali” -projektia.
- Napsauta sitten valikkoriviltä "Lisää" ja valitse "Moduuli".
- Avaa moduuli kaksoisnapsauttamalla ja liitä siihen seuraavat koodit:
Sub DeleteAllPageBreaksInOneDoc()
Application.ScreenUpdating = False
With Selection
.HomeKey Unit:=wdStory
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "^m"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
.Execute Replace:=wdReplaceAll
End With
End With
MsgBox ("All manual page breaks in the document have been removed!")
Application.ScreenUpdating = True
End Sub
- Lopuksi paina "F5" suorittaaksesi koodit.
Tapa 4: Poista kaikki sivunvaihdot kansion kaikista asiakirjoista
Voit poistaa kaikki sivunvaihdot kansion kaikista asiakirjoista käyttämällä tätä menetelmää.
- Jos haluat asentaa ja suorittaa makron, katso vaiheet menetelmässä 3.
- Ja muista korvata tämä alla olevalla makrolla:
Sub DeleteAllPageBreaksInAFolder()
Dim StrFolder As String
Dim strFile As String
Dim objDoc As Document
Dim dlgFile As FileDialog
Application.ScreenUpdating = False
Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
With dlgFile
If .Show = -1 Then
StrFolder = .SelectedItems(1) & "\"
Else
MsgBox "Select a folder first!"
Exit Sub
End If
End With
strFile = Dir(StrFolder & "*.docx", vbNormal)
While strFile <> ""
Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
With Selection
.HomeKey Unit:=wdStory
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "^m"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
.Execute Replace:=wdReplaceAll
End With
End With
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
Application.ScreenUpdating = True
End Sub
Makron pitäisi käynnistää ”Selaa”-ikkuna. Valitse kansio, joka sisältää kohdetiedostosi, ja jatka napsauttamalla ”OK”.
Valmistaudu Data Disasteriin
Monet teistä ovat olleet tietoisia tietojen katoamisen satunnaisuudesta. Wordin käyttäjille on myös suositeltavaa valmistautua hyvin kaikkiin tietokatastrofeihin. Ja yksi parhaista tavoista on saada a docx-korjaus työkalu etukäteen.
Tekijän esittely:
Vera Chen on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien xlsx-palautus ja pdf korjata ohjelmistotuotteita. Lisätietoja osoitteessa www.datanumen.com



