Ir para o conteúdo principal

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


seta azul bolha direita 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:

doc-classificar planilhas por célula-1

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.

Observações:

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?

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...

Descrição


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations