I have the following code to find the last row with data. It works
perfectly. However, how can I make it work on any sheet, essentially the
active tab, as opposed to a specific sheet as in the below example.

Sheets("HI01").Cells(Last(1, ActiveSheet.Cells), "m").Select