Macro needed...

Does anybody have a macro that renames the track to the name of the part?
I realize there’s a function in Cubase to do the opposite…
Ideally I would like to run it once and copy all the names to their respective tracks…