În acest articol, dorim să vă împărtășim 3 moduri de a șterge rapid toate pauzele de secțiune din documentul Word.
Secțiunile sunt utile în crearea mai multor secțiuni în documentul Word. Astfel, puteți formata diferite secțiuni în stiluri distincte. Și iată articolul nostru anterior pentru ca tu să inserezi rapid pauze de secțiune în document: 3 moduri de a introduce rapid rupturi de secțiune în documentul Word
Cu toate acestea, este destul de obișnuit să revizuiți un document, cum ar fi schimbarea stilurilor, re-împărțirea secțiunilor, etc. În special, dacă există o ajustare mare de făcut, probabil că va trebui să eliminați toate pauzele de secțiuni. Următoarele sunt 3 metode pe care le puteți utiliza pentru a șterge pauzele de secțiune în lot.
Metoda 1: Găsiți toate pauzele de secțiune din document
- În primul rând, apăsați „Ctrl + H” pentru a deschide caseta „Găsiți și înlocuiți” în Word.
- Apoi puneți cursorul în caseta de text „Găsiți ce”.
- Faceți clic pe butonul „Mai multe” pentru a obține mai multe opțiuni.
- Apoi faceți clic pe „Special” și alegeți „Break Break” din meniul său. Apoi, veți vedea „^ b” în caseta de text „Găsiți ce”. Deci, o modalitate alternativă este să introduceți „^ b” direct după pasul 2.
- În cele din urmă, lăsați caseta „Înlocuiți cu” și faceți clic pe „Înlocuiți toate”. Faceți clic pe „OK” pe caseta de confirmare.
Metoda 2: Rulați o macro pentru a șterge toate pauzele de secțiune dintr-un singur document
Iată modalitatea automată de a scăpa de toate pauzele de secțiune nedorite.
- Pentru început, deschideți editorul VBA în Word apăsând „Alt + F11”.
- Apoi creați un nou modul făcând clic pe „Normal”.
- Apoi faceți clic pe „Insert” și selectați „Module”.
- Acum deschideți modulul cu dublu clic.
- În spațiul de codare din partea dreaptă, lipiți următoarele coduri:
Sub DeleteAllSectionsInOneDoc()
With Selection
.HomeKey Unit:=wdStory
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "^b"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End With
End Sub
- În cele din urmă, faceți clic pe „Rulați”.
Toate pauzele de secțiune nu le veți găsi nicăieri într-o secundă.
Metoda 3: Ștergeți toate pauzele de secțiune din mai multe documente
În mod similar, trebuie să rulăm o macro dacă vrem să o facem într-un mod rapid și murdar.
- Înainte de toate, puneți toate documentele țintă într-un singur folder.
- Apoi instalați o macrocomandă cu pașii din metoda 2.
- Rulați în schimb această macrocomandă:
Sub DeleteAllSectionBreaksInMultiDoc()
Dim StrFolder As String
Dim strFile As String
Dim objDoc As Document
Dim dlgFile As FileDialog
Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
With dlgFile
If .Show = -1 Then
StrFolder = .SelectedItems(1) & "\"
Else
MsgBox "No folder is selected! Please select the target folder."
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 = "^b"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End With
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
- Apoi, în fereastra „Browse” deschisă, selectați folderul în care salvați documentele.
- Nu în ultimul rând, faceți clic pe „OK”.
Pregătiți-vă pentru pierderea datelor
În mod normal, cu obiceiuri bune de utilizare, mult noroc și toate binecuvântările, poți realiza multe în Word. Dar erorile te pot lovi oricând. Prin urmare, este de o importanță vitală să faci copii de rezervă ale documentelor în mod regulat. Cu o copie de rezervă la îndemână, vei fi mai încrezător înainte de a începe. docx fix.
Introducerea autorului:
Vera Chen este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv recuperare xls și pdf repararea produselor software. Pentru mai multe informații vizitați www.datanumen.com




