Can anyone recommend a easy method for programmatically determining the
number of times a character occurs within a single cell (e.g., the character
"*" occurs 5 times in text "A*B*C*D*E*F"). Thanks,

Justin

From a previous post...


Public Function GetCharCount(vString As String, CheckChar As String) as
Integer
Count=0
For n=1 to len(vstring)
If mid(vstring,n,1)=CheckChar then Count = Count + 1
Next
GetCharCount=Count
End Function


--
Regards,


Bill Lunney
www.billlunney.com

"Justin Ater" wrote in message
...
Can anyone recommend a easy method for programmatically determining the
number of times a character occurs within a single cell (e.g., the
character
"*" occurs 5 times in text "A*B*C*D*E*F"). Thanks,

Justin

Justin,

Try something like

NumChars = Len(S) - Len(Replace(S, "*", ""))

where S is your string.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Justin Ater" wrote in message
...
Can anyone recommend a easy method for programmatically
determining the
number of times a character occurs within a single cell (e.g.,
the character
"*" occurs 5 times in text "A*B*C*D*E*F"). Thanks,

Justin