Set focus on today's date

Set focus on today's date

In my sheet in column A I have a list of dates. I would like to focus on today's date on opening/viewing the sheet. I've managed to get this working in Excel using the find function/macro but I get an error in Zoho sheet if I try to use the same code. Here's the code that is working in Excel just for reference:
  1. Sub Workbook_Open()
    Dim FindString As Date
    Dim Rng As Range
    FindString = CLng(Date)
    With Sheets("Sheet1").Range("A:A")
    Set Rng = .Find(What:=FindString, _
    After:=.Cells(.Cells.Count), _
    LookIn:=xlFormulas, _
    LookAt:=xlWhole, _
    SearchOrder:=xlByRows, _
    SearchDirection:=xlNext, _
    MatchCase:=False)
    If Not Rng Is Nothing Then
    Application.Goto Rng, True
    Else
    MsgBox "Nothing found"
    End If
    End With
    End Sub