Excel vba range contains

' Tests if a range contains a value
Sub TestMe()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Worksheets(1)
    If Application.WorksheetFunction.CountIf(ws.Range("A2:A10"), _
           ws.Range("A1")) = 0 Then
        Debug.Print "No match"
    Else
        Debug.Print "Range contains value " & ws.Range("A1").Cells(1, 1).Value
    End If
End Sub

Similar codes

1 vote166 views1 answer
How to check is the value enterd is a number or text in vba
VBA
2 votes112 views1 answer
Excel vba pause
VBA
0 vote160 views1 answer
Excel vba scroll to cell
VBA
0 vote169 views1 answer
Supprimer la valeur de celule vba
VBA
0 vote153 views1 answer
Vb.net round to 2 decimal places
VBA
0 vote168 views1 answer
Excel R1C1 mode
VBA
2 votes147 views2 answers
Constructor vb.net
VBA
5 votes189 views1 answer
Excel vba last byte from INTEGER
VBA
0 vote164 views1 answer
Vba compare strings
VBA
0 vote151 views1 answer
Docker vboxmanage not found
VBA