How to count number of words per page in Word document?
As we know, we can count the number of words of the whole document in Word by applying its Word Count utility. But how can you count the number of words in the active page only? In this tutorial, I introduce some tricks to handle this job.
Count number of words in active page with manual selection
Count number of words in active page with VBA
Count number of words in active page with manual selection
1. Select the active document by cursor, then click Review > Word Count.
2. In the Word Count dialog, the number of words in the active document has been counted.
Count number of words in active page with VBA
In Word, there is no built-in function to count words in active page only, except the VBA code.
1.Place the cursor at the page you want to count words, press Alt + F11 keys to open the Microsoft Visual Basic for Applications window.
2. Click Insert > Module, copy and paste below code to the Module script.
VBA: Count number of words in active page
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. Press F5 key, then a message box pops out to tell you the number of words in the active page.
| Tabbed Browsing & Editing for Multiple Word Documents/Excel Workbooks, Just Like in Chrome and Edge! |
Just like browsing multiple webpages in Chrome, Safari and Edge, Office Tab lets you open and manage multiple Word documents or Excel workbooks in one Word window or Excel window. Switching between documents or workbooks is now simple with a click on their tabs! |
Best Office Productivity Tools
Kutools for Word - Elevate Your Word Experience with Over 100 Remarkable Features!
🤖 Kutools AI Features: AI Assistant / Real-Time Assistant / Super Polish (Preserve Format) / Super Translate (Preserve Format) / AI Redaction / AI Proofread...
📘 Document Mastery: Split Pages / Merge Documents / Export Selection in Various Formats (PDF/TXT/DOC/HTML...) / Batch Convert to PDF...
✏ Contents Editing: Batch Find and Replace across Multiple Files / Resize All Pictures / Transpose Table Rows and Columns / Convert Table to Text...
🧹 Effortless Clean: Sweap away Extra Spaces / Section Breaks / Text Boxes / Hyperlinks / For more removing tools, head to the Remove group...
➕ Creative Inserts: Insert Thousand Separators / Check Boxes / Radio Buttons / QR Code / Barcode / Multiple Pictures / Discover more in the Insert group...
🔍 Precision Selections: Pinpoint Specific Pages / Tables / Shapes / Heading Paragraphs / Enhance navigation with more Select features...
⭐ Star Enhancements: Navigate to Any Location / Auto-Insert Repetitive Text / Toggle Between Document Windows / 11 Conversion Tools...
🌍 Supports 40+ Languages: Use Kutools in your preferred language – supports English, Spanish, German, French, Chinese, and 40+ others!
✨ Kutools for Office – One Installation, Five Powerful Tools!
Includes Office Tab Pro · Kutools for Excel · Kutools for Outlook · Kutools for Word · Kutools for PowerPoint
📦 Get all 5 tools in one suite | 🔗 Seamless integration with Microsoft Office | ⚡ Save time and boost productivity instantly
Best Office Productivity Tools
Kutools for Word - 100+ Tools for Word
- 🤖 Kutools AI Features: AI Assistant / Real-Time Assistant / Super Polish / Super Translate / AI Redaction / AI Proofread
- 📘 Document Mastery: Split Pages / Merge Documents / Batch Convert to PDF
- ✏ Contents Editing: Batch Find and Replace / Resize All Pictures
- 🧹 Effortless Clean: Remove Extra Spaces / Remove Section Breaks
- ➕ Creative Inserts: Insert Thousand Separators / Insert Check Boxes / Create QR Codes
- 🌍 Supports 40+ Languages: Kutools speaks your language – 40+ languages supported!