Oder, was ich manchmal mache wenn es sehr wenige Subs sind:
- in 1. Sub/Function gehen, die ganz oben erscheinen soll, Strg+X, Strg+V
- in 2. Sub gehen die darunter stehen soll, Strg+X, Strg+V
usw.
Bei < 10 Sub/Functions ist das ziemlich schnell erledigt.
Ansonsten nehme ich auch den von Bernhard zitierten Script Sorter.