How to create macro to sort data in dynamic range

Hi,
I'm really struggling with this one so will appreciate any help.

I keep records of people in a file and sometimes I remove or add new people. Each row is equal to one record however there might be some data on the left so I can't select all row. The row below last record is empty and after that there are 3 rows with some formulas to summarise data in the records above. The first cell with the record is A5 and the records are as wide as to cell BJ. Although there is some data beneath, the last 5 columns on the right have no data below them so I assume that I could somehow make the macro to find the last cell with the record in column BJ and make selection to A5. When I have the range selected I need to sort the records by column C, which at the moment has only numbers in it. I forgot to mention that the last 3 columns also have formulas to summarise each record and they can store numeric value equal to or bigger than 0.

Can somebody help me with this problem. I think I know how to do it but I just don't know VB.
Thanks

Worked perfectly

Thanks a lot.