5 moduri de a elimina rapid marcatoarele și de a enumera numerele din documentul Word

În acest articol, am dori să vă demonstrăm 5 moduri simple de a elimina marcatoarele și numerele de listă din documentul dvs. Word.

Un document poate conține liste marcate și numerotate. Uneori, poate fi necesar să reformatați aceste liste. De exemplu, ar putea fi necesar să setați conținutul listei cu texte aldine, cursive sau obișnuite, pentru a numi doar câteva. Apoi, trebuie să eliminați mai întâi toate marcatoarele și să enumerați numerele.

Iată 5 soluții pentru diferite cazuri.

Metoda 1: Setați „Niciunul” marcatori sau numerotare

1. În primul rând, selectați intrările nedorite cu marcatori și numerotate.
2. Apoi faceți clic pe butonul drop-down de pe „Maranțe” sau „Numerotare”.
3. Faceți clic pe „Niciuna”.

Verificați rezultatul:

Metoda 2: Setați stilul „Normal” pentru intrările cu marcatori sau numerotate

1. Pentru început, selectați intrările inutile.
2. În al doilea rând, faceți clic pe fila „Acasă” din Panglică.
3. Apoi faceți clic pe butonul „Mai multe” din grupul „Stiluri”.
4. Apoi alegeți „Normal”.
5. Sau puteți apăsa „Ctrl+ Shift+ N” la pasul 2.

Metoda 3: Eliminați toate marcatoarele dintr-un document

1. În primul rând, apăsați „Alt+F11” pentru a deschide editorul VBA în Word.
2. În editor, faceți clic pe proiect „Normal”.
3. Apoi faceți clic pe fila „Inserare” și alegeți „Modul”.
4. Faceți dublu clic pe modul nou pentru a afișa zona de editare și inserați următoarea macrocomandă acolo:

Sub RemoveAllBulletsInADoc()
  Dim objParagraph As Paragraph
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objParagraph In ActiveDocument.Paragraphs
    If objParagraph.Range.ListFormat.ListType = WdListType.wdListBullet Then
      objParagraph.Range.ListFormat.RemoveNumbers
    End If
  Next objParagraph
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

5. În cele din urmă, faceți clic pe „Run” sau apăsați pe „F5”.

Iată rezultatul:

Metoda 4: Eliminați toate numerele de listă dintr-un document

1. Mai întâi, repetați pașii din metoda 3 pentru a instala și a rula o macrocomandă.
2. Doar tu ai nevoie de această macrocomandă:

Sub RemoveAllListNumbersInADoc()
  Dim objParagraph As Paragraph
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objParagraph In objDoc.Paragraphs
    If objParagraph.Range.ListFormat.ListType = wdListSimpleNumbering Then
      objParagraph.Range.ListFormat.RemoveNumbers
    End If
  Next objParagraph
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

Metoda 5: Eliminați toate marcatoarele și enumerați numerele dintr-un document

Acum, în cazul în care trebuie să eliminați atât marcatorii, cât și numerele de listă, puteți utiliza următoarea macrocomandă:

Sub RemoveBulletsAndListBumbers()
  Dim objParagraph As Paragraph
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objParagraph In objDoc.Paragraphs
    If objParagraph.Range.ListFormat.ListType = WdListType.wdListBullet Or wdListSimpleNumbering Then
      objParagraph.Range.ListFormat.RemoveNumbers
    End If
  Next objParagraph
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

Alegeți un instrument de reparare de încredere

Având în vedere faptul că Word este susceptibil la erori, există multe instrumente de reparare concepute pentru remediați Word. Cu toate acestea, trebuie să acordați suficientă atenție atunci când alegeți o astfel de utilitate, mai ales într-o perioadă de urgență. Amintiți-vă că instrumentul nefiabil poate provoca daune suplimentare datelor dvs.

Introducerea autorului:

Vera Chen este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv reparați xls și pdf repararea produselor software. Pentru mai multe informații vizitați www.datanumen.com