If addr = "$A$7:$A$65536" OR addr = $C$7:$C$65536 Then
.....
Mike F

"Steve" wrote in message
news:4vWGe.69962$5V4.39740@pd7tw3no...
Hi All,



I have a worksheet were every time a user double clicks on cell A7 a pop
up calendar appears and

the user can select a date which is them entered into cell A7. I used the
following code to do this:



Private Sub Worksheet_BeforeDoubleClick( _

ByVal target As Excel.Range, _

Cancel As Boolean)

Dim addr As String

addr = target.Address

If addr = "$A$7" Then

Call OpenCalendar

End If

End Sub



What I would like to do is to have the pop up calendar appear every time a
user double clicks in

any cell in column A starting at A7 as well as any cell in column C
starting a column C7.



Any suggestions?



Thanks,



Steve