|
|
#2
12-07-2011, 04:39 PM
|
||||
|
||||
hi icsjohn,
Try the following macro. It counts from the start of the selected range and doesn't care whether the current selection is more, or less, than the desired word count. Code:
Sub Demo()
Dim i As Long
i = InputBox("How many words do you want to select?", "Word Marker")
With Selection
While .Range.ComputeStatistics(Statistic:=wdStatisticWords) < i
.MoveEnd wdWord, i - .Range.ComputeStatistics(Statistic:=wdStatisticWords)
Wend
End With
End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] 
|
| Tags |
| highlight, macro, word count |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
 Mail Merge to create specific number of table rows
|
flackend | Mail Merge | 4 | 12-01-2023 02:49 PM |
|
Page number Macro
|
kimsi | Word | 3 | 11-15-2011 11:54 PM |
|
How to get the number of words in the file (please see details)?
|
Jamal NUMAN | Word | 24 | 07-24-2011 04:39 PM |
|
Need help extracting specific text from one doument to another with macro/VBA.
|
zsmithku | Word | 1 | 04-15-2011 03:46 PM |
| Why Words doesn’t show the style of the selected words automatically???? | Jamal NUMAN | Word | 0 | 04-14-2011 03:20 PM |
Windows 7 64bit 
Office 2010 32bit
Threaded Mode