sorting a column based on a predetermined order (not alphabetical)

I just made a macro (with the fabulous help of others on this forum) and gave it to the staff but I realized I overlooked how the sheet was originally sorted. I automatically sorted in alphabetical order which is not what it needs to be. Is there a way to sort 5 different categories in an order that I choose in my macro?

I need to sort the titles 'first time', 'repeat', 'occasional', out of town', 'special event' in that order.

Thanks!