Selecting last row problem

Hello Gurus,

I'm having a problem when selecting the last row of Column A. I'm using the below code and it gives me an error 'Object required' in the highlighted line.

Workbooks("Disti Data.xlsx").Activate
With ActiveSheet
.Range("A" & .Rows.Count).End(xlUp).Row.Select