You can add this command before running the sorting  column routine in your code

Application.StatusBar = "Sorting columns...Please wait."

Add this after your sorting column routine in your code

Application.StatusBar = False