Classificando guias em ordem alfabética com o Visual Basic for Applications ( VBA ) no Excel não é tão difícil quanto você pode pensar. No VBA , você pode usar o método " Worksheet.Move " para mover uma folha para outro local na pasta de trabalho . Você pode definir o nome ea ordem de suas folhas em uma matriz e percorrer a matriz de classificação para mover as guias de planilha . Este método é extremamente útil quando você precisa resolver através de muitas folhas de um livro . Instruções
1
Clique na guia "Desenvolvedor" e clique em " Visual Basic " para abrir o Editor do Microsoft Visual Basic. Clique no menu "Inserir" e clique em " Módulo " para adicionar um novo módulo
2
Comece criando um novo procedimento sub e adicionando o seguinte código VBA: .
Sub sortSheetsAlphabetically ( ),
3
Criar duas variáveis , digitando o seguinte código: Dim
shtNamesArray as Variant
Dim shtCntr as Long
4
Definir a matriz adicionando os nomes das folhas na ordem que você preferir , adicione a seguinte linha de código:
shtNamesArray = array (" aSheet ", " bSheet ", " cSheet " )
5
Criar um loop para classificar as folhas na ordem definida na matriz , adicionando o seguinte código:
Para shtCntr = UBound ( shtNamesArray ) Para LBound ( shtNamesArray ) Passo -1
.
Worksheets ( shtNamesArray ( shtCntr ) ) Mova Antes: = Worksheets ( 1)
Próxima shtCntr
6
Finalize o procedimento digitando " End Sub ". Pressione " F5" para executá-lo e ordenar as abas.