Function StringCountOccurrences(strText As String, strFind As String, _
Optional lngCompare As VbCompareMethod) As Long
'http://codevba.com/visual-basic-source-code/vb-string/count_occurrences_in_a_string.htm#.WCd9nYL3ieM
' Counts occurrences of a particular...