KutoolsforOffice — Uma solução, cinco ferramentas poderosas.Fazer mais com menos esforço.

Como excluir linhas se a célula for maior ou menor do que um determinado valor no Excel?

AutoraSiluvia Data de Modificação

Por vezes, poderá precisar de Excluir linhas se as células numa coluna especificada forem maiores ou menores do que um determinado valor no Excel. Este artigo recomendará vários métodos para resolver este problema.

Excluir linhas se a célula for maior/menor do que um determinado valor com código VBA
Excluir linhas se a célula for maior/menor do que um determinado valor com Kutools para Excel
Excluir linhas se a célula for maior/menor do que um determinado valor com Kutools para Excel

Excluir linhas se a célula for maior/menor do que um determinado valor com código VBA

Suponha que pretende eliminar a linha inteira sempre que a célula na coluna D for maior ou menor do que um determinado valor no Excel. Para o conseguir, basta executar o seguinte código VBA.

1. Prima simultaneamente as teclas Alt + F11 para abrir a janela Microsoft Visual Basic para Aplicações.

2. Na janela Microsoft Visual Basic para Aplicações, clique em Inserir > Módulo. Depois, copie e cole o seguinte código VBA na janela de código.

Código VBA: Excluir linhas se a célula for maior/menor do que um determinado valor no Excel

Public Sub ProcessData()
    Dim xRg As Range
    Dim xTxt As String
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If (xRg.Areas.Count > 1) Or (xRg.Columns.Count > 1) Then
        MsgBox "You can only select one column per time", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    xRg.Range("A1").EntireRow.Insert
    Set xRg = xRg.Range("A1").Offset(-1).Resize(xRg.Rows.Count + 1)
    xRg.Range("A1") = "Temp"
    xRg.AutoFilter 1, ">30000"
    Set xRg = Application.Intersect(xRg, xRg.SpecialCells(xlCellTypeVisible))
    On Error GoTo 0
    If Not xRg Is Nothing Then xRg.EntireRow.Delete
End Sub

Nota: No código acima, >30000 significa que irá eliminar linhas se as células forem superiores a 30000 numa coluna especificada. Se pretender eliminar linhas quando as células forem inferiores a um determinado valor, basta alterar o sinal > para < e indicar o valor pretendido.

3. Prima a tecla F5 para executar o código. Na caixa de diálogo Kutools para Excel que surge, selecione o intervalo (uma única coluna na qual verificará se as células são maiores ou menores do que um determinado valor). Em seguida, clique no botão OK. Veja a imagem:

executar código VBA para selecionar a lista de dados

Assim, todas as linhas cujo valor na coluna D seja superior a 30 000 são eliminadas imediatamente.

todas as linhas cujo valor da célula cumpre os critérios são eliminadas

Excluir linhas se a célula for maior/menor do que um determinado valor com Kutools para Excel

A utilidade Selecionar células específicas do Kutools para Excel permite-lhe selecionar todas as linhas cujas células sejam maiores ou menores do que um determinado valor numa coluna especificada, podendo depois eliminar manualmente todas as linhas selecionadas de uma só vez.

Kutools para Exceloferece mais de 300 funcionalidades avançadas para simplificar tarefas complexas, potenciando a criatividade e a eficiência.Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados descomplicada.Informações detalhadas de Kutools para Excel...         Teste gratuito...

1. Selecione a coluna com base na qual pretende excluir linhas e, em seguida, clique em Kutools > Selecionar > Selecionar células específicas. Veja a imagem:

clicar na funcionalidade Selecionar Células Específicas do Kutools

2. Na caixa de diálogo Selecionar células específicas, selecione Linha inteira na secção Selecionar tipo. Na secção Especificar tipo, escolha Maior do que ou Menor do que na primeira lista pendente, introduza o valor pretendido na caixa seguinte e, por fim, clique no botão OK.

definir critérios na caixa de diálogo

3. Surge então uma caixa de diálogo a indicar quantas linhas foram selecionadas; clique no botão OK. Verá imediatamente todas as linhas com valor superior a 30 000 na coluna D selecionadas.

4. Clique com o botão direito do rato numa das linhas selecionadas e, em seguida, clique em Eliminar no menu de contexto. Todas as linhas selecionadas serão eliminadas.

clicar em Eliminar

Se pretender experimentar gratuitamente esta utilidade durante 30 dias, clique para a transferir e, em seguida, siga os passos indicados acima.

Excluir linhas se a célula for maior/menor do que um determinado valor com Kutools para Excel

Além dos dois métodos acima referidos, pode filtrar todas as linhas cujas células sejam maiores ou menores do que um determinado valor numa coluna especificada e, em seguida, eliminar todas as linhas filtradas com a utilidade Eliminar Linhas e Colunas Ocultas (Visíveis) do Kutools para Excel.

Kutools para Exceloferece mais de 300 funcionalidades avançadas para simplificar tarefas complexas, potenciando a criatividade e a eficiência.Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados descomplicada.Informações detalhadas de Kutools para Excel...         Teste gratuito...

1. Selecione o cabeçalho da coluna e, em seguida, clique em Dados > Filtro. Veja a imagem:

clicar em Dados > Filtrar

2. Clique na seta pendente da coluna com base na qual irá excluir linhas, depois clique em Filtros Numéricos > Maior Do Que ou Menor Do Que, conforme ilustrado na imagem seguinte:

clicar em Filtros Numéricos > Maior Do Que ou Menor Do Que

3. Na caixa de diálogo Filtro Automático Personalizado, introduza o número pretendido após a opção «é maior do que» ou «é menor do que» e, em seguida, clique no botão OK.

introduzir os critérios na caixa de diálogo

4. São então filtradas todas as linhas cujas células na coluna D sejam maiores ou menores do que um determinado valor. Pode eliminar todas as linhas filtradas ao selecionar os dados filtrados e clicar em Kutools > Eliminar > Excluir linhas/colunas ocultas (visíveis). Veja a imagem:

clicar na funcionalidade Eliminar Linhas e Colunas Ocultas (Visíveis) do Kutools

5. Na caixa de diálogo Excluir linhas/colunas ocultas (visíveis), certifique-se de que a opção Intervalo Selecionado está selecionada na lista suspensa Procurar em, selecione Linhas na secção Tipo de exclusão, especifique a opção Linha visível na secção Tipo detalhado e, por fim, clique no botão OK.

especificar opções na caixa de diálogo

6. Todas as linhas visíveis do intervalo selecionado são imediatamente eliminadas. Pode cancelar o filtro ao clicar em Dados > Filtro.

Se pretender experimentar gratuitamente esta utilidade durante 30 dias, clique para a transferir e, em seguida, siga os passos indicados acima.

Artigos relacionados:

As Melhores Ferramentas de Produtividade para o Office

🤖KUTOOLS AI Assistente: Revolucione o Análise de Dados com base em:Execução Inteligente   |  Gerar Código|  Criar fórmulas personalizadas  |  Analisar Dados e Gerar Gráficos|  Invocar Funções Aprimoradas…
Funcionalidades Populares:Localizar, Destacar ou Marcar Duplicatas   |  Excluir linhas em branco   |  Combinar Colunas ou Células sem Perder Dados   |   Arredondamento sem usar fórmula...
Super PROC:VLookup com Múltiplos Critérios  |  VLookup com Múltiplos Valores  |   VLookup em Múltiplas Folhas   |   Correspondência Fuzzy....
Lista Suspensa Avançada:Criar Rapidamente Lista de Seleção   |  Lista de Seleção Dependente   |  Lista de Seleção com Múltipla Escolha....
Gestor de Colunas:Adicionar um Número Específico de Colunas|Mover Colunas|Alternar Estado de Visibilidade de Colunas Ocultas|Comparar Intervalos e Colunas...
Funcionalidades em Destaque:Grade de foco   |  Visualização de Design   |Barra de fórmulas aprimorada   | Gestor de Pastas de Trabalho e Folhas   |  Biblioteca de Recursos(Texto Automático)|  Seleção de Data   |  Consolidar Planilhas  |  Encriptar/Descriptografar Células   | Enviar Emails por Lista   |  Super Filtro   |   Filtro Especial(Filtrar Células com Fonte em Negrito/itálico/rasurado...) ...
Principais Conjuntos de Ferramentas 15:12 Ferramentasde Texto(Adicionar Texto,Excluir Caracteres Específicos, ...)|   50+Tiposde Gráfico(Gráfico de Gantt, ...)|   40+ Fórmulas Práticas(Calcular a idade com base na data de nascimento, ...)|   19 Ferramentasde Inserção(Inserir QR Code,Inserir Imagem a Partir do Caminho, ...)|   12 Ferramentasde Conversão(Converter em Palavras,Conversão de moeda, ...)|   7 Ferramentasde Mesclar e Dividir(Mesclar Linhas Avançado,Dividir Células, ...)|... e muito mais
Utilize o Kutools na sua língua preferida – suporta inglês, espanhol, alemão, francês, chinês e mais 40+ idiomas!

Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...

Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil

  • Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
  • Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!

Todos os suplementos Kutools — num único instalador.

Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.

ExcelWordOutlookTabsPowerPoint
  • Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
  • Um instalador, uma licença— configuração em minutos (pronto para MSI)
  • Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
  • Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
  • Melhor relação qualidade-preço— poupe face à compra individual dos suplementos