Checking for a range of values in a if statement

[Slade2000]

Hi

I would like to know how can i check for a rabge of cells that contain something in a if function. This is the code i tried but does not seem to work?

If i use it with single cell and not a range it works 100%

    If Range("C5").Value < Range("A2").Value Then
        If Range("K5:K11") = "" Then
         MsgBox "Werk"
        End If
    End If

 

[Slade2000]

Re: Checking for a range of values in a if statement [Solved]

Got it.

Sub Email()
    Dim A As Integer
    A = Application.WorksheetFunction.CountIf(Range("K5:K11"), "")
    If A > 0 Then
     MsgBox "Werk"
    End If
End Sub