How to find Number of Occurences of Slash from a strings

Question

How can I find the number of occurrences of the forward slash character ( / ) within a string using an Excel VBA macro?

Answer 1

Old question, but I thought I would add to the quality of the answer by an answer I found at an excel forum. Apparently the count can also be found using.

    count =Len(string)-Len(Replace(string,"/","")) 

Full credit for the answer goes to the original author at:http://www.ozgrid.com/forum/showthread.php?t=45651

Answer 2

Use the below function, as in count = CountChrInString(yourString, "/").

''' ''' Returns the count of the specified character in the specified string. ''' Public Function CountChrInString(Expression As String, Character As String) As Long ' ' ? CountChrInString("a/b/c", "/") '  2 ' ? CountChrInString("a/b/c", "\") '  0 ' ? CountChrInString("//////", "/") '  6 ' ? CountChrInString(" a / b / c ", "/") '  2 ' ? CountChrInString("a/b/c", " / ") '  0 '     Dim iResult As Long     Dim sParts() As String      sParts = Split(Expression, Character)      iResult = UBound(sParts, 1)      If (iResult = -1) Then     iResult = 0     End If      CountChrInString = iResult  End Function