A
acces
Hi,
I have a large list of entries...In column A there is Date...Then I
have UserForm with Calendar. After selecting Date in form, I'd like to
find address of cell in column A with selected Date...
Why following doesn't work, required Date isn't found...
With Worksheets(1).Range("A:A")
Set c = .Find(Calendar1.Value)
If Not c Is Nothing Then
firstaddress = c.Address
' Do something
Else
' Do something else
End If
End With
Any help will be useful...
Thanks.
I have a large list of entries...In column A there is Date...Then I
have UserForm with Calendar. After selecting Date in form, I'd like to
find address of cell in column A with selected Date...
Why following doesn't work, required Date isn't found...
With Worksheets(1).Range("A:A")
Set c = .Find(Calendar1.Value)
If Not c Is Nothing Then
firstaddress = c.Address
' Do something
Else
' Do something else
End If
End With
Any help will be useful...
Thanks.