Worksheetfunciton.countif clarification

[Excel Hopeful]

I have the code below running. It's suppose to look at range B15:E21, if there are any values in those cells the Message box should pop up. It's not working. Is it because I'm using Used Range?

With Worksheets("Sheet1")
        If WorksheetFunction.CountIf(UsedRange, "") > 0 Then
           MsgBox Title:="Error!!", Prompt:="Your are trying to send notification that you have no unfunded issues, however, you have not cleared the data.", Buttons:=vbOKOnly + vbInformation
           Exit Sub
        End If
    End With

 

[Scott Huish]

If you use UsedRange you are missing a dot before it:

If WorksheetFunction.CountIf(.UsedRange, "") > 0 Then

however, this may not necessarily constrain the range to B15:E21, why not just use that range directly?

Perhaps COUNTBLANK?

Sub test()
With Worksheets("Sheet1")
    If WorksheetFunction.CountBlank(.Range("B15:E21")) > 0 Then
       MsgBox Title:="Error!!", Prompt:="Your are trying to send notification that you have no unfunded issues, however, you have not cleared the data.", Buttons:=vbOKOnly + vbInformation
       Exit Sub
    End If
End With
End Sub