VBA Macro

[j4ymf]

Hello if I use this macro it takes me to GP3
in cell A1 I have =TODAY(), how do I jump to the cell that has todays date in?

<code>Sub Jumpto()

Range("GP3").Select
End Sub</code>

Thank you Jason

 

[Logit]

.

Sub Jumpto()
    Sheet1.Range("A1").Select
End Sub

Edit sheet name and range as required.

 

[j4ymf]

sorry my fault

I have dates in A5:AAA5
and I have =TODAY() in A1, how do I find the same date in the range and jump to that.

Does that make sense

Jay

 

[Logit]

.
If I correctly understand ... give this a try :

Option Explicit


Sub DateJump()
  Dim cell As Range
    
  For Each cell In Sheets("Sheet1").Range("A5:AAA5").Cells
    If cell.Value = Sheets("Sheet1").Range("A1").Value Then
        cell.Select
    End If
  Next cell
  
End Sub