Find stuf on a page Like how many of stephen on a page i have one but it doesnt work anyone have one that kind of works
yes how many are in the doc like if there 25 stephen on the page and i want it to find stephen and it would show up as 25 in the text box
Uhh you could parse however many times stephen shows up on the screen and add it to a textbox. Then whatever your parsing, it could be like "stephen" then under it put "text1.text=+1" and make sure you put a number in the text1 box that you want to add to. Hopefully that will help?
Here's a function I made, it works now!!! Code (Text): Public Function TimesInString(strSource As String, strText As String, Optional Start = 1) As Long Dim lngCurrent, temp As Long lngCurrent = Start Do Until lngCurrent = 0 TimesInString = TimesInString + 1 lngCurrent = InStr(lngCurrent + 1, strSource, strText) Loop End Function