VBA Custom Sort Order Issues

Hello,
First I have to admit I am not working on this for a job, it is a hobby, and maybe worse it is an MMORPG. I am making a sheet to track my own and my friends characters and all important information related to those characters. The end file will be stored on a shared folder on Dropbox (great tool) so that each player can edit their character's info. I say this so that anyone helping will understand what I am trying to do. The issue I have is in the Sort routine in the modSort module.
I am trying to do a single routine to sort as many as 22 tabs by a custom sort order based on a list of names but putting the name of the current tab first. I have the sorting of the string of names working but when I tried to replace a static CustomOrder:= argument with my variable I ran into errors. Is the CustomOrder argument able to accept a variable? If it is how can I format the string correctly to make it work.
Any input anyone has on what I have done is welcome. I am by no means an expert on coding and such.

Character Chart.xlsm

Not sure (there's a lot going on) but try the following:
in the macro "Sub Sort()" adapt these lines

Please Login or Register  to view this content.

and

Please Login or Register  to view this content.

Thanks, the sortorder part was ok, the variable held the right string of text but that CStr command did the trick.