![]() |
|
#4
|
||||
|
||||
|
As I said, with a macro. For example, the following macro will output a word-count for each Section at the end of the document.
Code:
Sub Demo()
Dim Sctn As Section, StrCounts As String
With ActiveDocument
For Each Sctn In .Sections
StrCounts = StrCounts & "Section " & Sctn.Index & ":" & vbTab & _
Sctn.Range.ComputeStatistics(wdStatisticWords) & vbCr
Next
.Range.InsertAfter StrCounts
End With
End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
Move table cell contents from one table to another table or cell in same table
|
donaldadams1951 | Word VBA | 4 | 02-04-2015 03:54 PM |
Table with Table of Contents as a Column
|
dynamictiger | Word Tables | 4 | 07-21-2014 10:16 PM |
| Table of Contents | feature | Word | 10 | 04-09-2013 05:45 AM |
Table of Contents
|
ep2002 | Word | 4 | 06-20-2012 10:23 PM |
| Table of contents | markos97 | Word | 0 | 10-26-2010 08:52 AM |