counting occurances of a char. within a text string/cell

[Justin Ater]

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

 

[Bill Lunney]

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

 

[Chip Pearson]

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 (e-mail address removed)