Note: The other languages of the website are Google-translated. Back to English
Log in  \/ 
x
or
x
Registe-se  \/ 
x

or

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 Dados > 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 de Ordenar puxe para baixo e selecione Valores de Célula de Classificar em seção, escolha Do maior para o menor de Ordem 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 Excluir 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

O 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 > Excluir > 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 de 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.


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 ...
  • Super Formula Bar (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-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Teste gratuito de 30 dias com recursos completos. 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!
officetab bottom
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Marcia · 2 years ago
    It deleted all my names in my first name column! Auuggh!
  • To post as a guest, your comment is unpublished.
    sawan · 4 years ago
    Thanks its very helpful page with basic excel option :)
  • To post as a guest, your comment is unpublished.
    shabbir juzar deluxe · 4 years ago
    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
    • To post as a guest, your comment is unpublished.
      manjunath · 3 years ago
      Hello,


      try to implement below code
  • To post as a guest, your comment is unpublished.
    uday · 5 years ago
    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?
  • To post as a guest, your comment is unpublished.
    Nelson · 6 years ago
    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
  • To post as a guest, your comment is unpublished.
    KARTHIKEYAN · 7 years ago
    the above details are very helpful for my personal use. Thanks for your guidance.

    M.KARTHIKEYAN :-)
  • To post as a guest, your comment is unpublished.
    KJ St.Piere · 8 years ago
    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.