Ir para o conteúdo principal

Como excluir várias colunas vazias rapidamente no Excel?

Às vezes, quando você importa dados para o Microsoft Excel de alguma fonte, como página da web, CSV, texto, etc., pode haver muitas colunas vazias com eles. Deve ser demorado excluir cada coluna vazia uma por uma. Portanto, alguns de nós buscam maneiras fáceis de resolver esse problema. Este artigo coleta algumas dicas complicadas para ajudá-lo a excluir várias colunas vazias rapidamente.

Excluir várias colunas vazias na planilha com fórmula

Exclua várias colunas vazias na planilha com o código VBA

Exclua várias colunas vazias na seleção / planilha ativa / pasta de trabalho inteira com um recurso útil

Exclua várias colunas vazias com um cabeçalho usando o código VBA


Excluir várias colunas vazias na planilha com fórmula

No Excel, você pode aplicar uma fórmula para identificar se as colunas estão em branco ou não, e então usar o tipo recurso para classificar todas as colunas em branco juntas e excluí-las de uma vez. Faça o seguinte:

1. Adicione uma nova linha no topo do seu intervalo de dados, veja a captura de tela:

2. Em seguida, insira a fórmula abaixo na célula A1 e arraste a alça de preenchimento para o lado direito para aplicar esta fórmula a outras células, um VERDADEIRO será exibido se a coluna estiver em branco;

=COUNTA(A2:A1048576)=0

3. Em seguida, selecione o intervalo de dados incluindo a linha auxiliar e clique em Data > tipo, veja a captura de tela:

4. No estalou para fora tipo caixa de diálogo, clique em Opções botão, no seguinte Opções de classificação diálogo, selecione Classificar da esquerda para a direita opção, veja as capturas de tela:

5. Clique OK botão para retornar o tipo caixa de diálogo e selecione Linha 1 do Ordenar puxe para baixo e selecione Valores de Célula da Classificar em seção, escolha Do maior para o menor do Encomenda seção, veja a captura de tela:

6. Então, todas as colunas vazias foram classificadas à esquerda de seus dados, e agora, você só precisa selecionar todas as colunas e clicar com o botão direito, escolher Apagar para excluir essas colunas em branco de uma vez, consulte a captura de tela:


Exclua várias colunas vazias na planilha com o código VBA

Se você quiser usar macro VBA, as coisas serão muito mais fáceis. O seguinte código VBA pode ajudá-lo, faça o seguinte:

1. Segure o outro + F11 chaves no Excel, e abre o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe cole a macro a seguir no Módulo Janela.

Código VBA: Exclua várias colunas em branco na seleção:

Sub DeleteEmptyColumns () 'Updateby Extendoffice
Dim rng como intervalo Dim InputRng como intervalo xTitleId = "KutoolsforExcel" Set InputRng = Application.Selection Set InputRng = Application.InputBox ("Range:", xTitleId, InputRng.Address, Type: = 8) Application.ScreenUpdating = False For i = InputRng.Columns.Count para 1 Etapa -1 Defina rng = InputRng.Cells (1, i) .EntireColumn If Application.WorksheetFunction.CountA (rng) = 0 Then rng.Delete End If Next Application.ScreenUpdating = True End Sub

3. aperte o F5 para executar esta macro, selecione a faixa de trabalho necessária na caixa de diálogo pop-out. Veja a imagem:

4. Clique OK, todas as colunas vazias da seleção serão removidas. Veja a imagem:


Exclua várias colunas vazias na seleção / planilha ativa / pasta de trabalho inteira com um recurso útil

A Excluir linhas e colunas ocultas (visíveis) utilidade de Kutools for Excel pode ajudá-lo a remover rapidamente várias linhas ou colunas vazias de uma vez.

Tips:Para aplicar isso Excluir linhas e colunas ocultas (visíveis) recurso, em primeiro lugar, você deve baixar o Kutools for Excele, em seguida, aplique o recurso de forma rápida e fácil.

Depois de instalar Kutools for Excel, por favor, faça o seguinte:

1. Clique Kutools > Apagar > Excluir linhas e colunas ocultas (visíveis), veja a captura de tela:

2. No Excluir linhas e colunas ocultas (visíveis) caixa de diálogo, especifique o escopo de onde deseja aplicar a operação Olhar dentro lista suspensa. (Se você escolher No intervalo selecionado, você deve selecionar um intervalo que deseja usar primeiro.) E, em seguida, verifique colunas para Excluir tipo. E selecione Colunas em branco da Tipo detalhado. Veja a imagem:

3. Então clique OK. E as colunas em branco foram excluídas do intervalo selecionado. Veja a imagem:


Exclua várias colunas vazias com um cabeçalho usando o código VBA

Às vezes, você pode querer excluir todas as colunas vazias que contêm apenas um cabeçalho na planilha, o seguinte código VBA pode fazer um favor, siga estas etapas:

1. Segure o outro + F11 chaves no Excel, e abre o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe cole a macro a seguir no Módulo Janela.

Código VBA: exclua todas as colunas vazias com um cabeçalho

Sub deleteblankcolwithheader()
'updateby Extendoffice
    Dim xEndCol As Long
    Dim I As Long
    Dim xDel As Boolean
    On Error Resume Next
    xEndCol = Cells.Find("*", SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column
    If xEndCol = 0 Then
        MsgBox "There is no data on """ & ActiveSheet.Name & """ .", vbExclamation, "Kutools for Excel"
        Exit Sub
    End If
    Application.ScreenUpdating = False
    For I = xEndCol To 1 Step -1
        If Application.WorksheetFunction.CountA(Columns(I)) <= 1 Then
            Columns(I).Delete
            xDel = True
        End If
    Next
    If xDel Then
        MsgBox "All blank column(s) with only a header row have been deleted.", vbInformation, "Kutools for Excel"
    Else
        MsgBox "There are no Columns to delete as each one has more data (rows) than just a header.", vbExclamation, "Kutools for Excel"
    End If
    Application.ScreenUpdating = True
End Sub

3. Em seguida, pressione a tecla F5 para executar este código e uma caixa de prompt aparecerá para lembrá-lo de que as colunas em branco com cabeçalho serão excluídas, veja a captura de tela:

4. E então, clique no botão OK, todas as colunas em branco com apenas o cabeçalho na planilha atual são excluídas de uma vez. Veja as capturas de tela:


Mais artigos relativos:

  • Excluir todas as linhas ou colunas ocultas no Excel
  • Se você tiver uma pasta de trabalho grande com muitas linhas e colunas ocultas, e agora os dados ocultos não estão disponíveis, você gostaria de excluir todos eles. Como você poderia excluí-los rapidamente?
  • Exclua todas as imagens ou outros objetos no Excel
  • Se desejar excluir todas as imagens do Microsoft Excel, pode ser demorado selecionar cada imagem e excluí-las uma por uma. Os truques a seguir podem facilitar seu trabalho para excluir todas as fotos.
  • Excluir linhas com base na cor de fundo no Excel
  • Como você pode excluir linhas inteiras com base na cor de fundo? Neste exemplo, preciso excluir todas as linhas cujas células preencheram com a cor de fundo azul, conforme mostrado a seguir. Com este artigo, você obterá alguns códigos para realizar essa tarefa no Excel.

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 (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
It deleted all my names in my first name column! Auuggh!
This comment was minimized by the moderator on the site
Thanks its very helpful page with basic excel option :)
This comment was minimized by the moderator on the site
Hi, can anyone guide how i can delete blank cells in a row or column...note whole blank column or rows... only blank cell i need to delete in a column
This comment was minimized by the moderator on the site
Hello,


try to implement below code
This comment was minimized by the moderator on the site
Hi, the thing which you are mentioned is so helpfull. I want a small help from your side. Daily am download the some files and using pivot prepared the reports. It is daily task for me and routine process. How can i do it with out using pivot. Ex: If i prepared the reports on yesterday in "A" Excel file. Next day in "A" Excel file just i replace the new "B" Excel file data. By this automatically report would be create? Is it possible?
This comment was minimized by the moderator on the site
Very helpful page. Thank you. :-) My challenge is that I have columns with headers, but no data in that column. Only the header is present. How would one go about deleting columns where there is no data, but the header is there? :o
This comment was minimized by the moderator on the site
the above details are very helpful for my personal use. Thanks for your guidance. M.KARTHIKEYAN :-)
This comment was minimized by the moderator on the site
I found it much simpler to go to the line after my last line of data, enter "Shift-Ctrl-End" to highlight all blank lines that followed(much faster), right click and enter "delete all rows/columns". The system didn't waste so much time searching this way and so it was clean in the blink of an eye and files that were 20 MB were dropped to a size of 20 kb.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations