num =
Application.Countif(Range("A1:A10000"),worksheets( "Sheet1").Textbox1.Text)

--
Regards,
Tom Ogilvy

"DB100 " wrote in message
...
Hi all

Just a quick one...

I have a list of data that has no more than 30 differing names. But
there about 10000 entries

To complete something I am working on, I need to be able to count how
many times a name may appear in the list, depending on what name is
entered in the text box on my user form.

Hope you can help

Thanks


---
Message posted from http://www.ExcelForum.com/