check an ective cell against a defined range

[dyerstm]

I have a sub routine that checks if the ActiveCell.Value is within a specified range(("A7:A46") but I cant get it to work, what I'm trying to do is ensure that when a user clicks my command button it checks the active cell and compares it to range("A7:A46")

I have something like this

Private Sumb Cmdbutton_Click()

if activeCell.value <> myRange("A7:A46")
...indicate error!

but I can't get it to work

 

[Norie]

To check if a cell is in a range try using Intersect.

If Not Intersect(ActiveCell, Range("A7:A46") Is Nothing Then
     ' active cell is in range so run code
Else
     ' active cell is not in range
     Msgbox "Select a cell within the appropriate range please"
End If

 

[Legacy 1363]

I think that the OP wants to check the value of the active cell with the values in A6:A47.

But she/he does not explain what sort of check is required - i.e. whether to check that the value exists in the range, or whether the value is within (or perhaps not outside of) the range of values within the range, or something else