Using the Find function with the What referencing a Range/Cell Value
 

Below is part of the Macro.

Columns("B:B").Select
Selection.Find("01/20/04", _
After:=ActiveCell, _
LookIn:=xlValues, _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False).Activate
ActiveCell.Select
ActiveCell.Offset(0, 3).Activate

The macro works but in the portion

Selection.Find("01/20/04"

I would like to have the "01/20/04" (date) reference a value from
cell in my spreadsheet (also a date)

--
Message posted from http://www.ExcelForum.com

Using the Find function with the What referencing a Range/Cell Value
 

Try something like

Selection.Find Range("A1").Text, ....


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"PFederinko " wrote
in message ...
Below is part of the Macro.

Columns("B:B").Select
Selection.Find("01/20/04", _
After:=ActiveCell, _
LookIn:=xlValues, _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False).Activate
ActiveCell.Select
ActiveCell.Offset(0, 3).Activate

The macro works but in the portion

Selection.Find("01/20/04"

I would like to have the "01/20/04" (date) reference a value
from a
cell in my spreadsheet (also a date).


---
Message posted from http://www.ExcelForum.com/