Macro que ordena todas as folhas de livro do Excel

Uma macro de ordena todas as folhas (Workksheets) de um livro (Workbook) do Microsoft Excel.
A macro deve ser colocada num modulo do livro, através do editor de visual basic (ALT+F11). Pode executá-la através da lista de macros (ALT+F8).