In het artikel van vandaag presenteren we u 2 snelle en effectieve methoden om het aantal opsommingstekens in uw Word-document te tellen.
Van tijd tot tijd gebruikten we lijsten met opsommingstekens of genummerde lijsten in onze documenten om items te ordenen. Over het algemeen leidt een opsommingsteken of een cijfer naar een afzonderlijk item, of het nu een woord, een zin of een zin is. Als u nu een genummerde lijst heeft, zal het geen probleem zijn om het totale artikelnummer te achterhalen. Maar wat als er lijsten met opsommingstekens in uw Word-document staan? Gewoon één voor één tellen klinkt niet goed.
Daarom, voor het geval sommigen van jullie het opsommingsteken moeten samenvatten, zijn hier twee manieren om erachter te komen.
Methode 1: Converteer een lijst met opsommingstekens naar een genummerde lijst
- Selecteer eerst de lijst waarvan u het opsommingsteken wilt ontvangen.
- Klik vervolgens op “Nummering” in de groep “Paragraaf” op het tabblad “Start”. De lijst met opsommingstekens verandert in een genummerde lijst.
Of u kunt ook met de rechtermuisknop op de selectie klikken en de cursor over de optie "Nummering" bewegen, en vervolgens de cursor op een van de nummeringsstijlen in het uitbreidingsmenu plaatsen. Hierdoor kunt u het aantal opsommingstekens achterhalen zonder de lijst met opsommingstekens daadwerkelijk naar een genummerde lijst te converteren.
Als u de opsommingstekens van het hele document wilt tellen, hoeft u overigens alleen maar de cursor in één lijst met opsommingstekens te plaatsen en vervolgens de bovenstaande stappen te volgen. U zult zien dat alle lijsten met opsommingstekens in het bestand zijn geconverteerd naar genummerde lijsten met nummers in volgorde, zoals hieronder:
Methode 2: gebruik macro
- Om te beginnen: als u de opsommingstekens van een specifieke lijst wilt zien, selecteert u deze. Anders moet u voor het aantal opsommingstekens in het hele document op “Ctrl+A” drukken om het in selectie te hebben.
- Klik vervolgens op het tabblad “Ontwikkelaar”.
- Klik vervolgens op “Visual Basic” om de VBA-editor te openen. De sneltoetscombinatie is “Alt+F11”.
- Klik nu op “Normaal” en vervolgens op “Invoegen”.
- Kies vervolgens “Module”.
- Dubbelklik op de nieuwe module en plak deze codes in het bewerkingsgebied:
Sub GetNumberOfBullets()
Dim objRange As Range
Dim objParagraph As Paragraph
Dim nNumber As Integer
' Initialization
Set objRange = Selection.Range
nNumber = 0
For Each objParagraph In objRange.Paragraphs
If objParagraph.Range.ListFormat.ListType = WdListType.wdListBullet Then
nNumber = nNumber + 1
End If
Next objParagraph
' Pop up a message box to show the total number of bullets.
MsgBox ("Bullet number:" & nNumber)
End Sub
- Klik ten slotte op "Uitvoeren".
U zult een berichtvenster zien verschijnen met het resultaat.
Beheer uw bestand goed
Tijdens onze werkervaring hebben we te maken met een groot aantal Word-documenten. Het wordt aanbevolen dat we er zorgvuldig mee omgaan, want elk ongeluk kan tot corruptie leiden. En als er toch bestandsschade optreedt, hebt u een Herstelprogramma voor Word-documenten om u te helpen het probleem op te lossen.
Auteur Introductie:
Vera Chen is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder xls reparatietool voor gegevensschade en pdf reparatie softwareproducten. Voor meer informatie bezoek www.datanumen.com