Kako prešteti število besed na stran v dokumentu Word?

Kot vemo, lahko v Wordu preštejemo število besed celotnega dokumenta z uporabo njegove pripomočke za štetje besed. Kako pa lahko preštejete število besed samo na aktivni strani? V tej vadnici predstavljam nekaj trikov za reševanje tega dela.

Štejte število besed na aktivni strani z ročnim izbiranjem

Štejte število besed na aktivni strani z VBA

---

Štejte število besed na aktivni strani z ročnim izbiranjem

1. Izberite aktivni dokument s kazalcem in kliknite pregled > Število besed.

2. V Ljubljani Število besed v pogovornem oknu je bilo prešteto število besed v aktivnem dokumentu.

---

Štejte število besed na aktivni strani z VBA

V Wordu ni vgrajene funkcije za štetje besed samo na aktivni strani, razen kode VBA.

1. Kazalec postavite na stran, na kateri želite prešteti besede, in pritisnite Alt + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. klik Vstavi > Moduli, kopirajte in prilepite spodnjo kodo v Moduli skripta.

VBA: preštejte število besed na aktivni strani

Sub GetWordsCount_ActivePage()
'UpdatebyExtendoffice20180829
    Dim xWord As Long
    xWord = ActiveDocument.Bookmarks("\Page").Range.ComputeStatistics(wdStatisticWords)
    MsgBox "The number of words of atcive page: " & xWord, vbInformation, "Kutools for Word"
End

3. Pritisnite F5 tipko, nato se prikaže okno s sporočilom, ki vam pove število besed na aktivni strani.