& Str(lEndnoteWords) & ' word(s),' & Str(lEndnoteChars) & ' characters') & Str() & ' Endnotes contain(s)' & vbCr _ & Str(lFootnoteWords) & ' word(s),' & Str(lFootnoteChars) & ' characters' & vbCr & vbCr _ & Str() & ' footnotes contain(s)' & vbCr _ & Str(lTextboxWords) & ' word(s),' & Str(lTextboxChars) & ' characters' & vbCr & vbCr _ & Str() & ' textboxes contain(s)' & vbCr _ & Str(lDocumntWords) & ' word(s) and' & Str(lDocumntChars) & ' characters' & vbCr & vbCr _ MsgBox (' In this document there are totally' & vbCr _ MsgBox ('There is no Endnote in this document') LEndnoteChars = lEndnoteChars + objTemp.Characters LEndnoteWords = lEndnoteWords + objTemp.Words If objRange.StoryType = wdEndnotesStory Then ' Count the words and characters in all endnotes. MsgBox ('There is no footnote in this document') LFootnoteChars = lFootnoteChars + objTemp.Characters LFootnoteWords = lFootnoteWords + objTemp.Words If objRange.StoryType = wdFootnotesStory Then ' Count the words and characters in all footnotes. MsgBox ('There is no text box in this document') LTextboxChars = lTextboxChars + objTemp.Characters LTextboxWords = lTextboxWords + objTemp.Words ' Count the words and characters in all textboxes. Set objTemp = Dialogs(wdDialogToolsWordCount) ' Count the words and characters in the whole document. Sub SeparateCountNumberOfTextboxFootnoteEndnote()įor Each objTextboxShape In ActiveDocument.Shapes

Double click the module to open the coding area and paste the following codes there:.

Then insert a new module in “Normal” project by clicking “Normal” first.

Next press “Alt+ F11” to open VBA editor.

Firstly, trigger the “Word Count” box using the way in method 1 and ensure the option box is checked.

Method 3: Run Word Macro to Get Separate Count of Words from Text Boxes, Footnotes and Endnotes So you just need to uncheck the “Include textboxes, footnotes and endnotes” box. Method 2: Exclude Texts from Text Boxes, Footnotes and Endnotes from Word Count

If you can’t find the “Words” command on status bar, right click on there.

Ensure you have checked “Include textboxes, footnotes and endnotes” box. There you will see all kinds of statistics.First and foremost, go to the status bar and click “Words” to open the “Word Count” box.Method 1: Count Words Including Texts from Text Boxes, Footnotes and Endnotesīy default, Word counts all words appear on the document, including texts in text boxes and words from footnotes and endnotes as well. But if you want to get the number of words of different kinds of texts, then more operations will be required. It’s not hard to get the total count of words in a document. In today’s article, there are 3 quick ways to get word count statistics related to text boxes, footnotes and endnotes in your document.

Character count in word for mac 2016