View Single Post
  #1   Report Post  
GarrettD78
 
Posts: n/a
Default Counting Expression in a Single formula

Thanks. That was perfect

"Bob Phillips" wrote:

I gave a simple UDF the other day that works for simple + delimiters

Function CountList(rng As Range, Optional delimiter As String = "+")
Dim arg
If rng.Count 1 Then
CountList = CVErr(xlErrRef)
Else
arg = Split(rng.Formula, delimiter)
CountList = UBound(arg) - LBound(arg) + 1
End If
End Function



--

HTH

RP
(remove nothere from the email address if mailing direct)


"GarrettD78" wrote in message
...
I am trying to figure out a way to count up the number of expressions in a
formula that was created. So for example

=8+10+44+53

This would give me 4. Seems like you should be able to do it but I am not
sure how. Thanks in advance