Note: The other languages of the website are Google-translated. Back to English

Como classificar dados em várias planilhas de uma vez?

No Excel, podemos classificar os dados em uma planilha com base em uma coluna específica com rapidez e facilidade, mas você já tentou classificar os dados em várias planilhas? Classificá-los um por um será demorado. Neste artigo, apresentarei uma maneira fácil de resolvê-lo.

Classifique dados em várias planilhas de uma vez com o código VBA


seta azul bolha direita Classifique dados em várias planilhas de uma vez com o código VBA

Para classificar dados com base em uma coluna em todas as planilhas de sua pasta de trabalho, o código VBA a seguir pode ajudá-lo.

1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

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

Código VBA: Classifique os dados em várias planilhas de uma vez:

Sub SortAllSheets()
   'Updateby Extendoffice
   Dim WS      As Worksheet
   ActiveSheet.Range("a1:f1").Select
   Selection.Copy
   On Error Resume Next
   Application.ScreenUpdating = False
   For Each WS In Worksheets
      WS.Columns("A:F").Sort Key1:=WS.Columns("E"), Order1:=xlDescending
   Next WS
   ActiveSheet.Range("A1").PasteSpecial Paste:=xlPasteAll
   Application.ScreenUpdating = True
End Sub

3. Então aperte F5 chave para executar este código, todas as folhas que têm a mesma formatação foram classificadas com base na coluna E de cada folha em ordem decrescente de uma só vez.

Nota: No código acima, A: F é o intervalo de dados que você deseja classificar, E é a letra da coluna na qual você deseja classificar com base.


As melhores ferramentas de produtividade para escritório

O Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Insira rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de discussão e enviar emails ...
  • Barra Super Fórmula (edite facilmente várias linhas de texto e fórmula); Layout de leitura (ler e editar facilmente um grande número de células); Colar na faixa filtrada...
  • Mesclar células / linhas / colunas sem perder dados; Dividir o conteúdo das células; Combinar linhas / colunas duplicadas... Evite células duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Único Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros; Seleção aleatória ...
  • Cópia exata Várias células sem alterar a referência da fórmula; Criação automática de referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair Texto, Adicionar texto, remover por posição, Remover Espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salvar e aplicar esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro Especial por negrito, itálico ...
  • Combine pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Divida os dados em várias folhas; Conversão em lote de xls, xlsx e PDF...
  • Mais de 300 recursos poderosos. Suporta Office / Excel 2007-2021 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Recursos completos de avaliação gratuita de 30 dias. Garantia de devolução do dinheiro em 60 dias.
guia kte 201905

Guia do Office 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!
parte inferior da aba do escritório
Comentários (11)
Ainda não há classificações. Seja o primeiro a avaliar!
Este comentário foi feito pelo moderador no site
Não funciona ...
Este comentário foi feito pelo moderador no site
Como posso fazer isso funcionar para várias colunas. Estou tentando classificar alguns pela coluna K e alguns pela coluna M e sei os números exatos das folhas. Minha coluna M (quando uso o código acima) está sendo classificada apenas pelo K, não pelo M, portanto, não está funcionando. 
Este comentário foi feito pelo moderador no site
funcionou como um encanto para mim ... obrigado!
Este comentário foi feito pelo moderador no site
funciona bem, mas como posso evitar incluir os títulos (ou seja, linha 1?)
Este comentário foi feito pelo moderador no site
Olá, Lúcia,
Para classificar todas as planilhas, exclua a linha de cabeçalho, aplique o código vba abaixo: (Observação: altere as referências de célula de acordo com sua necessidade)

Sub SortAllSheets()
'Atualizar por Extendoffice
Dim WS como planilha
Dim xIntR como inteiro
ActiveSheet.Range("A1:F1").Selecione
On Error Resume Next
Application.ScreenUpdating = False
Para cada WS nas planilhas
xIntR = Intersect(WS.UsedRange, WS.Range("A:F")).Rows.Count
WS.Range("A2:F" & xIntR).Sort Key1:=WS.Range("A2:A" & xIntR), Order1:=xlDescending
Próximo WS
Application.ScreenUpdating = True
End Sub

Por favor, tente, espero que possa ajudá-lo!
Este comentário foi feito pelo moderador no site
Na esperança de que você veja isso...! Isso funciona maravilhosamente - mas inclui células com uma fórmula, mas sem dados, criando lacunas nas guias e bagunçando os dados nas linhas. Eu preciso manter essas células em minhas guias enquanto elas procuram nomes adicionados à 'guia mestre'. Eu quero que ela classifique apenas células com um nome real - uma solução rápida??
Este comentário foi feito pelo moderador no site
Código muito útil Obrigado
Este comentário foi feito pelo moderador no site
Ei, isso é ótimo, muito obrigado por isso! Meu único problema com esse código é que ele não é executado na minha primeira planilha. Ele executa nas minhas folhas restantes. Como eu faria isso para executar em todas as planilhas? É como se o código pulasse a primeira folha. Qualquer ajuda seria muito apreciada :)
Este comentário foi feito pelo moderador no site
eu quero dividir os dados em várias pastas de trabalho e, em seguida, adicionar o valor em uma das colunas.

preparei o código para dividir os dados em pastas de trabalho.. mas preciso de ajuda para adicionar o total em uma das colunas
Este comentário foi feito pelo moderador no site
Você pode executar isso sem incluir todas as folhas? Ou seja, deixar algumas folhas fora da macro?
Este comentário foi feito pelo moderador no site
Isso não parecia funcionar para mim. Tenho uma pasta de trabalho com 12 planilhas ordenadas por meses do ano cada planilha contendo os dados correspondentes dos produtos da empresa etc. Meu objetivo é ordenar e filtrar todas as planilhas da pasta de trabalho. Eu gostaria de ter uma planilha que atuasse como a planilha pai (por exemplo, primeiro mês do ano), na qual eu executaria uma função de filtro ou classificação (por exemplo, A -> Z sort) e automaticamente faria com que as outras planilhas seguissem o mesmo classificar ou filtrar. Por exemplo, ao usar a planilha rotulada "Janeiro" se, por exemplo, eu escolher a coluna "D" que inclui os dias do mês que eu quero em ordem "crescente" - ao atualizar a classificação A -> Z na planilha "Janeiro" , quero que isso afete o restante de todas as planilhas na sequência (fevereiro-dez) com todos os dias do mês classificados de A -> Z. Qualquer alteração feita na planilha "Janeiro" no que se refere à classificação e filtragem deve efetuar o saldo das planilhas na pasta de trabalho.
Não há comentários postados aqui ainda
Deixe o seu comentário
Postando como convidado
×
Avalie esta postagem:
0   Personagens
Locais sugeridos

Siga-nos

Copyright © 2009 - www.extendoffice.com. | Todos os direitos reservados. Distribuído por ExtendOffice. | | | Mapa do site
Microsoft e o logotipo do Office são marcas comerciais ou marcas registradas da Microsoft Corporation nos Estados Unidos e / ou em outros países.
Protegido por Sectigo SSL