SUMIF Wild Card formula for two words in cell
Hi Howard,
Am Fri, 13 Feb 2015 14:32:08 -0800 (PST) schrieb L. Howard:
It just occurred to me that one could use cell references to write the BB CC etc. to the UDF as a variable.
then you have to enlarge the declaration.
But here a more reliable UDF for a string with 3 times 2 characters.
If you write the first substring in A1 and the second in A2 then call
the UDF with:
=mysum(E1:F7;A1;A2)
Function mySum(myRng As Range, str1 As Range, _
str2 As Range) As Double
Dim varData As Variant
Dim n As Long
Dim myStr As String
varData = myRng
For n = 1 To UBound(varData)
myStr = Replace(Replace(varData(n, 1), str1, ""), str2, "")
If Len(Trim(myStr)) = 2 Then
mySum = mySum + varData(n, 2)
End If
Next
End Function
Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional
|