Como classificar as planilhas por um valor de célula no Excel?

Quando usamos um arquivo Excel, sempre classificamos as planilhas por ordem alfabética, números ou cores das guias, mas você já tentou classificar as guias da planilha por um valor de célula específico?

Supondo que você tenha uma pasta de trabalho com dezenas de planilhas, em cada planilha a célula A1 tem um valor específico e agora você precisa classificar todas as planilhas dentro desta pasta de trabalho com base no valor da célula A1 em cada planilha de forma ascendente. Com este artigo, você obterá a solução.

Classifique todas as planilhas com base em um valor de célula com código VBA

---

Classifique todas as planilhas com base em um valor de célula com código VBA

Para classificar todas as planilhas com base em um valor de célula no Excel, não existe uma maneira direta para nós, mas o código VBA a seguir pode lhe fazer um favor.

1. Segure o ALT + F11 chaves, e abre o Janela Microsoft Visual Basic for Applications.

2. Clique inserção > Móduloe cole o seguinte código no Janela Módulo.

Código VBA: classifique todas as planilhas com base em um valor de célula

Sub SortWksByCell()
'Update 20141127
Dim WorkRng As Range
Dim WorkAddress As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range (Single)", xTitleId, WorkRng.Address, Type:=8)
WorkAddress = WorkRng.Address
Application.ScreenUpdating = False
For i = 1 To Application.Worksheets.Count
    For j = i To Application.Worksheets.Count
        If VBA.UCase(Application.Worksheets(j).Range(WorkAddress)) < VBA.UCase(Application.Worksheets(i).Range(WorkAddress)) Then
            Application.Worksheets(j).Move Before:=Application.Worksheets(i)
        End If
    Next
Next
Application.ScreenUpdating = True
End Sub

3. Depois de colar o código, pressione F5 para executar este código, e uma caixa de prompt aparecerá para lembrá-lo de selecionar uma célula na qual deseja classificar as planilhas, veja a captura de tela:

4. E agora, você pode ver que todas as planilhas foram classificadas de acordo com o valor do texto da célula A1 em cada planilha de forma ascendente.

notas:

1. Se houver números e sequências de texto nas células selecionadas, as planilhas que contêm números serão classificadas antes das planilhas das sequências de texto.

2. Se houver um espaço em branco em uma das células A1, a planilha relativa será classificada na frente de todas as planilhas.

---

Artigos relacionados:

Como classificar planilhas em ordem alfabética / alfanumérica no Excel?

Como classificar as guias da planilha por cor no Excel?

Como inverter a ordem das guias da planilha?