5 veidi, kā ātri noņemt aizzīmes un saraksta numurus no jūsu Word dokumenta

Šajā rakstā mēs vēlamies jums parādīt 5 vienkāršus veidus, kā noņemt aizzīmes un sarakstu numurus no jūsu Word dokumenta.

Dokuments var saturēt sarakstus ar aizzīmēm un numuriem. Dažreiz, iespējams, būs jāpārformatē šie saraksti. Piemēram, jums var būt jāiestata saraksta saturs treknrakstā, kursīvā vai parastos tekstos, lai nosauktu tikai dažus. Tad vispirms ir jānoņem visas aizzīmes un saraksta numuri.

Šeit ir 5 dažādu gadījumu risinājumi.

1. metode: iestatiet “None” aizzīmes vai numerāciju

1. Vispirms atlasiet nevēlamus ierakstus ar aizzīmēm un numurus.
2. Pēc tam noklikšķiniet uz nolaižamās pogas “Bullets” vai “Numbering”.
3. Noklikšķiniet uz “None”.

Pārbaudiet rezultātu:

2. metode: iestatiet “Normal” stilu ierakstiem ar aizzīmēm vai numuriem

1. Vispirms atlasiet nevajadzīgos ierakstus.
2. Pēc tam lentē noklikšķiniet uz cilnes Sākums.
3. Pēc tam grupā “Stili” noklikšķiniet uz pogas “Vēl”.
4. Pēc tam izvēlieties “Normal”.
5. Vai arī tā vietā varat nospiest “Ctrl + Shift + N” 2. darbībā.

3. metode: noņemiet visas dokumenta aizzīmes

1. Pirmkārt un galvenokārt, nospiediet taustiņu kombināciju “Alt+F11”, lai atvērtu VBA redaktoru programmā Word.
2. Redaktorā noklikšķiniet uz “Normāls” projekts.
3. Pēc tam noklikšķiniet uz cilnes “Ievietot” un izvēlieties “Modulis”.
4. Veiciet dubultklikšķi uz jaunā moduļa, lai parādītu rediģēšanas apgabalu, un tur ielīmējiet šādu makro:

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. Visbeidzot, noklikšķiniet uz “Palaist” vai nospiediet “F5”.

Lūk, rezultāts:

4. metode: noņemiet visus saraksta numurus dokumentā

1. Vispirms atkārtojiet 3. metodes darbības, lai instalētu un palaistu makro.
2. Šis makro ir nepieciešams tikai jums:

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

5. metode: dokumentā noņemiet visas aizzīmes un saraksta numurus

Tagad, ja jums ir jānoņem gan aizzīmes, gan saraksta numuri, varat izmantot šo makro:

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

Izvēlieties uzticamu remonta rīku

Ņemot vērā to, ka Word ir pakļauts kļūdām, ir izstrādāti daudzi labošanas rīki labot Word. Tomēr, izvēloties šādu utilītu, jums jāpievērš pietiekama uzmanība, īpaši ārkārtas laikā. Atcerieties, ka neuzticams rīks var vēl vairāk sabojāt jūsu datus.

Autora ievads:

Vera Čena ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp labot xls un pdf programmatūras produktu labošana. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar