how to know word number by VBA

macropod · #1 08-13-2012, 10:47 AM

Simpler:

Code:

Sub Demo()
With ActiveDocument
  MsgBox .Range(0, InStr(.Range.Text, "My String")).ComputeStatistics(wdStatisticWords) - 1
End With
End Sub

Venky62 · #2 08-13-2012, 08:48 PM

Great macro, Paul, as always.

While testing the code I wrote and the one you posted, I found that my code gives wrong results. If the number of words before the search string is 4, then my code gives 5. If the number is 25, it gives 27. And the margin of error increases, with increasing number of words before the search string.Your code, on the other hand, is perfect.

What is it that I am doing wrong? Thanks in advance.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
generating a number in Word	John P	Word	1	05-31-2012 10:29 PM
auto number in word	expert4knowledge	Word	7	05-31-2012 02:37 PM
Mailing: how to make the "page number" in Word is the same as "row number" in excel w	Jamal NUMAN	Word	1	09-03-2011 11:37 AM
Textbox Number changes when I open Word	t0m46	Word VBA	0	09-07-2010 05:46 AM
Number formatting in Word table	8braitp	Word Tables	0	08-27-2009 04:12 AM