Excel files don't have an end  of file  as such. The contents are stored in a
complex file format, where the different formulas, values, etc, are
scattered through the file.

Is it more that you want to find  the bottom row in a sheet? If so:

Call Cells(Rows.Count, "A").End(xlUp).Select

will select the bottom A cell  that has a value in it. (Change the column if
A can't be relied on to always have something in it.) You can grab the
bottom row number  in a variable if you need to. e.g.

Dim Bottom As Long
Bottom = Cells(Rows.Count, "A").End(xlUp).Row
Call MsgBox(Bottom)