Highligt row of active cell, error in macro

Here is the file, thank you for taking a look

As a beginner starter :

PHP Code: 

Sub Demo1()
    With Ark5
        .Activate
        .UsedRange.Rows(Ark80.[D9].Value2).Select
    End With
End Sub 


Do you like it ? So thanks to click on bottom left star icon « ★ Add Reputation » !

Another way from the date as a beginner starter :

PHP Code: 

Sub Demo2()
        Dim V
    With Ark5.ListObjects(1)
            V = Application.Match(Fix(Ark80.[D4].Value2), .DataBodyRange.Columns(2), 0)
        If IsNumeric(V) Then
            .Parent.Activate
            .ListRows(V).Range.Select
        End If
    End With
End Sub 


Do you like it ? So thanks to click on bottom left star icon « ★ Add Reputation » !

Thanks Marc

Both your solutions worked great.
I am not quite sure I understand your code, would you comment it for me. I am new in VBA :-)
I like Demo1 as it is simpel and stil as fast as Demo2, 0,78 sec. my test showed.
But I like how Demo2 gets the right cell from the date and not from ENGINE SHEET D9

This is how I did it before and it is nearly same time to run as yours. Demo3
Thanks again for your help

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Thanks for your effort to help, I did not get your solution to work.
But thanks for your help :-)

Thanks for your help Ben, Marc L found a solution I was happy with :-)

Thanks for the rep' !

I won't comment as it is at beginner level, all is yet within VBA inner help
except for Application.Match which is the Excel worksheet function MATCH (to see in Excel help) …