Skip to main content

Kutools para Office — Uma Suíte. Cinco Ferramentas. Aumente sua Produtividade.

Como ordenar guias de planilha por cor no Excel?

Author Xiaoyang Last modified

Ao trabalhar com grandes pastas de trabalho do Excel contendo várias planilhas, atribuir cores às guias das planilhas ajuda a categorizá-las e organizá-las visualmente. No entanto, o Excel não oferece uma opção embutida para ordenar as guias das planilhas automaticamente por cor. Neste artigo, exploraremos dois métodos eficazes para ordenar as guias das planilhas por cor no Excel.

a screenshot of sorting worksheet tabs by color

Ordenar guias de planilha por cor com código VBA

Ordenar guias de planilha por cor com Kutools para Excel


Ordenar guias de planilha por cor com código VBA

Usando o seguinte código VBA, você pode ordenar as guias por cor. Por favor, siga os passos abaixo:

1. Clique em "Desenvolvedor" > "Visual Basic", uma nova janela "Microsoft Visual Basic for Applications" será exibida, clique em "Inserir" > "Módulo" e insira o seguinte código no Módulo:

VBA: Ordenar planilhas por cores.

Sub SortWorkBookByColor()
'UpdatebyExtendoffice
Dim xArray1() As Long
Dim xArray2() As String
Dim n As Integer
Application.ScreenUpdating = False
If Val(Application.Version) >= 10 Then
    For i = 1 To Application.ActiveWorkbook.Worksheets.Count
        If Application.ActiveWorkbook.Worksheets(i).Visible = -1 Then
            n = n + 1
            ReDim Preserve xArray1(1 To n)
            ReDim Preserve xArray2(1 To n)
            xArray1(n) = Application.ActiveWorkbook.Worksheets(i).Tab.Color
            xArray2(n) = Application.ActiveWorkbook.Worksheets(i).Name
        End If
    Next
    For i = 1 To n
        For j = i To n
            If xArray1(j) < xArray1(i) Then
                temp = xArray2(i)
                xArray2(i) = xArray2(j)
                xArray2(j) = temp
                temp = xArray1(i)
                xArray1(i) = xArray1(j)
                xArray1(j) = temp
            End If
        Next
    Next
    For i = n To 1 Step -1
        Application.ActiveWorkbook.Worksheets(CStr(xArray2(i))).Move after:=Application.ActiveWorkbook.Worksheets(Application.ActiveWorkbook.Worksheets.Count)
    Next
End If
Application.ScreenUpdating = True
End Sub

2. Em seguida, pressione "F5" ou clique no botão "Executar" para executar o código. E todas as guias das planilhas serão ordenadas por cor.

a screenshot of original tab order
arrow
a screenshot of tab order after sorting by color

Ordenar guias de planilha por cor com Kutools para Excel

Com o Kutools, você pode reordenar rapidamente suas guias com base nas suas cores, economizando tempo e eliminando a necessidade de classificação manual ou classificação por código VBA. Nesta seção, mostraremos como usar o Kutools para Excel para ordenar as guias das planilhas por cor facilmente.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

Se você instalou o Kutools para Excel, pode ordenar as guias das planilhas seguindo os passos abaixo:

1. Clique em "Kutools Plus" > "Planilha" > "Ordenar Planilhas".

2. Na caixa de diálogo "Ordenar Planilhas", clique no botão "Ordenação por Cor", você verá a nova ordem das guias no painel "Nova ordem das guias de planilha".

a screenshot of sorting sheet tabs by color using Kutools for Excel

3. E então clique em "OK" para ordenar as guias.

Esse recurso pode reorganizar rapidamente todas as planilhas na pasta de trabalho ativa. Ele suporta vários tipos de ordenação, incluindo "Ordenação Alfabética", "Ordenação Exata", "Ordenação por Cor" e "Ordenação Reversa". Além disso, você também pode "mover para cima / baixo" as planilhas e redefinir a ordenação.

Ordenar guias de planilha por cor no Excel ajuda a melhorar a organização e facilita a navegação em grandes pastas de trabalho. Embora o Excel não tenha uma opção embutida para isso, este artigo aborda dois métodos úteis para você. Escolha o método que melhor atende às suas necessidades e tire proveito total do recurso de cor de guia do Excel para otimizar seu fluxo de trabalho! Se você estiver interessado em explorar mais dicas e truques do Excel, nosso site oferece milhares de tutoriais.


Artigo relacionado:

Ordenar planilhas em ordem alfabética / alfanumérica no Excel


Melhores Ferramentas de Produtividade para Office

🤖 Kutools AI Aide: Revolucione a análise de dados com: Execução Inteligente   |  Gerar Código  |  Criar Fórmulas Personalizadas  |  Analisar Dados e Gerar Gráficos  |  Chamar Funções Aprimoradas
Recursos Populares: Localizar, Destacar ou Marcar Duplicatas   |  Excluir Linhas em Branco   |  Consolidar Colunas ou Células sem Perder Dados   |   Arredondar...
Super PROC: Procura por múltiplos critérios    Procura por múltiplos valores  |   Procura em várias planilhas   |   Correspondência Fuzzy...
Lista Suspensa Avançada: Crie rapidamente Lista suspensa  |  Lista suspensa dependente  |  Lista suspensa com múltipla seleção ...
Gerenciador de Colunas: Adicionar número específico de colunas  | Mover Colunas  | Alternar status de visibilidade de Colunas ocultas |  Comparar Intervalos & Colunas...
Recursos em Destaque: Grade de foco   |  Visualização de Design  |  Barra de fórmulas aprimorada    Gerenciador de Pasta de trabalho & Planilha   |  Biblioteca de AutoTexto (Auto Text)   |  Selecionador de Data   |  Mesclar Dados   |  Criptografar/Descriptografar Células    Enviar Email por Lista   |  Super Filtro   |   Filtro Especial (filtrar negrito/itálico/tachado...) ...
Os 15 Principais Conjuntos de Ferramentas: 12 Ferramentas de Texto (Adicionar Texto, Excluir Caracteres Específicos, ...)  | 50+ Tipos de Gráficos (Gráfico de Gantt, ...)  | 40+ Fórmulas Práticas (Calcular a idade com base na data de nascimento, ...)  | 19 Ferramentas de Inserção (Inserir Código QR, Inserir Imagem pelo Caminho, ...)  | 12 Ferramentas de Conversão (Converter em Palavras, Conversão de Moeda, ...)  | 7 Ferramentas de Mesclar & Dividir (Mesclar Linhas Avançado, Dividir Células, ...) | ...e muito mais
Use o Kutools no idioma de sua preferência – compatível com Inglês, Espanhol, Alemão, Francês, Chinês e mais de40 idiomas!

Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para acessar o recurso que você mais precisa...


Office Tab traz interface com abas para o Office e facilita muito seu trabalho

  • Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
  • Aumente sua produtividade em50% e economize centenas de cliques todos os dias!

Todos os complementos Kutools. Um instalador

O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.

Excel Word Outlook Tabs PowerPoint
  • Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
  • Um instalador, uma licença — configuração em minutos (pronto para MSI)
  • Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
  • Avaliação completa por30 dias — sem registro e sem cartão de crédito
  • Melhor custo-benefício — economize comparado à compra individual de add-ins