Find a cell that matches the value of another cell

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a cell (A1) in column (A) that contains the formula..... =today() ...... I would like to record a macro that would do a find (or goto) on that same column (A5.. A15000) to move the active cell cursor (to find) the cell below that matches today's date. It seems that I cannot do a find on a column based on the result of a formula of another cell.
 
try this where col A contains dates and b1 has =today()

Sub findtoday()
MsgBox Columns(1).Find(Range("b1")).Address
End Sub

Sub gotofindtoday()
Application.Goto Reference:= _
Range(Columns(1).Find(Range("b1")).Address)
End Sub
--
Don Guillett
SalesAid Software
(e-mail address removed)
JLC said:
I have a cell (A1) in column (A) that contains the formula..... =today()
Click to expand...
....... I would like to record a macro that would do a find (or goto) on that
same column (A5.. A15000) to move the active cell cursor (to find) the cell
below that matches today's date. It seems that I cannot do a find on a
column based on the result of a formula of another cell.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Excel formula, sum the value cell and if empty cell left blank 0
Last Modified By in a cell by user 3
Macro: finding a cell on one worksheet and copying to another worksheet 0
Automatically Enter Formula in a Cell After Entering Data in Another Cell 0
Excel VBA to move cursor from 1 cell to another, once original cell is filled with data. 3
Match cells 1
Find first empty cell in column 2
Excel [VBA] Check from a cell into another sheet and bring back result in MsgBox 0

Back
Top