5 spôsobov, ako rýchlo odstrániť odrážky a vypísať čísla z dokumentu Word

V tomto článku by sme vám chceli predstaviť 5 jednoduchých spôsobov, ako odstrániť odrážky a uviesť čísla z dokumentu Word.

Dokument môže obsahovať zoznamy s odrážkami a číslované zoznamy. Niekedy bude možno potrebné tieto zoznamy preformátovať. Možno budete napríklad musieť nastaviť obsah zoznamu tučným písmom, kurzívou alebo bežným textom, aby ste vymenovali aspoň niektoré. Potom musíte najskôr odstrániť všetky odrážky a uviesť čísla čísel.

Tu je 5 riešení rôznych prípadov.

Metóda 1: Nastaviť odrážky alebo číslovanie na „Žiadne“

1. Najskôr vyberte nežiaduce položky s odrážkami a očíslované položky.
2. Potom kliknite na rozbaľovacie tlačidlo „Odrážky“ alebo „Číslovanie“.
3. Kliknite na „Žiadne“.

Skontrolujte výsledok:

Metóda 2: Nastavte „Normálny“ štýl pre položky s odrážkami alebo číslované

1. Najskôr vyberte nepotrebné položky.
2. Potom kliknite na kartu Domov na páse s nástrojmi.
3. Potom kliknite na tlačidlo „Viac“ v skupine „Štýly“.
4. Ďalej zvoľte „Normálny“.
5. Alebo môžete namiesto toho v kroku 2 stlačiť klávesovú skratku „Ctrl + Shift + N“.

Metóda 3: Odstrániť všetky odrážky z dokumentu

1. V prvom rade stlačte klávesy „Alt + F11“ a otvorte editor VBA vo Worde.
2. V editore kliknite na projekt „Normálny“.
3. Potom kliknite na kartu „Vložiť“ a zvoľte „Modul“.
4. Dvojitým kliknutím na nový modul zobrazíte oblasť úprav a prilepíte tam nasledujúce 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. Nakoniec kliknite na tlačidlo „Spustiť“ alebo stlačte kláves „F5“.

Tu je výsledok:

Metóda 4: Odstránenie všetkých čísel zo zoznamu v dokumente

1. Najskôr zopakujte kroky v metóde 3, aby ste nainštalovali a spustili makro.
2. Toto makro potrebujete iba vy:

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

Metóda 5: Odstráňte všetky odrážky a vypisujte čísla z dokumentu

Teraz, ak potrebujete odstrániť odrážky aj čísla zoznamov, môžete využiť nasledujúce 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

Vyberte si dôveryhodný nástroj na opravu

Vzhľadom na to, že Word je náchylný na chyby, existuje veľa nástrojov na opravu, ktoré sú určené pre tento účel opraviť Word. Pri výbere takého nástroja však musíte venovať dostatočnú pozornosť, najmä v čase núdze. Pamätajte, že nespoľahlivý nástroj môže spôsobiť ďalšie poškodenie vašich údajov.

Úvod autora:

Vera Chen je expertka na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane opraviť xls a pdf oprava softvérových produktov. Pre viac informácií navštívte www.datanumen. S