View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Don Guillett Don Guillett is offline
external usenet poster
 
Posts: 10,124
Default Sumproducct question

How about a nice macro.

Sub sumifucase()
For i = 16 To 200
If Len(Application.Trim(Cells(i, "e"))) 0 _
And StrComp(UCase(Cells(i, "e")), Cells(i, "e")) < 0 _
And Len(Application.Trim(Cells(i, "M"))) = 0 _
Then ms = ms + Cells(i, "n")
Next i
MsgBox ms
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"DocBrown" wrote in message
...
Can anyone help with a sumproduct question?

I would like to sum the values in range $N$16:$N$200 if the value in
column
E of the row is not a capital letter and column M of the row is blank.

Column E can be blank, one uppercase letter, or lower case letter.

Thanks a bunch
John