sorting every cell with data in excel using VBA

Question

I recorded a macro for sorting this sheet. how do I replace the hardcoded ranges so that this script works with any number of rows?

Worksheets(1).sort.SortFie