Sort ascending before the word found

[emina002]

Hi to all, is it possible to perform sorting before the word "Grand Total"? I attached sample workbook to picture out how can I perform sorting before the grand total word. I'd like to record macro out of it the problem is, it is a monthly report so the volume of data/information are not fixed.kindly help me I am confused

Many thanks!