4 hitri načini za odstranjevanje neželenih prelomov strani v dokumentu Word

Skupna raba zdaj:

V tej objavi se bomo osredotočili na predstavitev 4 hitrih metod za odstranitev neželenih prelomov strani v dokumentu Word.

Word vstavi samodejni prelom strani, ko skoči z ene strani na naslednjo. Poleg tega lahko za koncem obsega besedila vstavite ročni prelom strani. Tako se bo besedilo začelo na vrhu naslednje strani. Če želite izvedeti, kako vstaviti ročni prelom strani, si oglejte ta članek: 5 načinov za hitro vstavljanje prelomov strani v dokument Word

Vendar bi morali razumeti, da so samodejni prelomi strani nevidni in jih zato ni mogoče ročno izbrisati. Toda vstavljeni ročni prelomi strani to počnejo. Tako vam bo naš članek v glavnem ponudil uporabne pristope za odstranjevanje neželenih ročnih prelomov strani v Wordovem dokumentu.   Odstranite neželene prelome strani v dokumentu Word

1. način: Ročno odstranite prelome strani

  1. Najprej morate na zavihku »Domov« klikniti ukaz »Pokaži / skrij«, da razkrijete vse skrite oznake in simbole v dokumentu, da si lahko ogledate prelom strani.
  2. Nato izberite prelom strani in pritisnite »Izbriši«, da se ga znebite.
  3. Lahko pa kliknete levo od preloma strani in nato pritisnete »Delete«.Izberite Prelom strani -> Pritisnite "Izbriši"

2. način: Uporabite funkcijo »Poišči in zamenjaj«

  1. Za začetek pritisnite »Ctrl + H«, da sprožite polje »Najdi in zamenjaj«.
  2. Nato postavite kazalko v besedilno polje »Najdi kaj« in kliknite jeziček »Več«.
  3. Nato kliknite »Special« in v tem meniju izberite »Manual Page Break«.Kliknite "Special" -> Izberite "Manual Page Break"
  4. Na koncu pustite polje »Zamenjaj z« prazno in kliknite »Zamenjaj vse«, da odstranite vsak prelom strani v dokumentu.

3. način: Zaženite makro, da izbrišete vse prelome strani v dokumentu

  1. Najprej sprožite urejevalnik VBA v Wordu s pritiskom na “Alt + F11”.
  2. Nato v levem stolpcu kliknite projekt »Normal«.
  3. Nato v menijski vrstici kliknite »Vstavi« in izberite »Modul«.Kliknite "Običajno" -> kliknite "Vstavi" -> kliknite "Modul"
  4. Odprite modul z dvojnim klikom in tja prilepite naslednje kode:
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
  1. Nazadnje pritisnite "F5" za izvajanje kod.Prilepite kode-> Kliknite "Zaženi"

4. način: Izbrišite vse prelome strani v vseh dokumentih v mapi

Če želite odstraniti vse prelome strani v vseh dokumentih v mapi, lahko uporabite to metodo.

  1. Če želite namestiti in zagnati makro, si oglejte korake v 3. metodi.
  2. In ne pozabite zamenjati s tem makrom spodaj:
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

Makro bo sprožil okno »Brskaj«. Izberite mapo, ki vsebuje ciljne dokumente, in kliknite »V redu« za nadaljevanje.

Pripravite se na katastrofo podatkov

Mnogi od vas ste se zavedali naključnosti izgube podatkov. Za uporabnike Worda je prav tako priporočljivo, da se dobro pripravijo na kakršno koli podatkovno katastrofo. In eden najboljših načinov je pridobiti a docx popravilo orodje vnaprej.

Uvod avtorja:

Vera Chen je strokovnjakinja za obnovitev podatkov v DataNumen, Inc., ki je vodilna na svetu na področju tehnologij za obnovitev podatkov, vključno z xlsx okrevanje in pdf popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com

Skupna raba zdaj:

Komentarji so zaprti.