Página 1 de 1
Excluir linhas usando VARIOS critério
Enviado: 04 Out 2016 às 22:45
por ljrbrasil
Pessoal
Boa noite!
Tenho uma planilha com 50072 linhas e cada uma dela tem um código e preciso excluir vários códigos exceto 49 códigos
Então achei a macro a baixo e preciso saber como faço para sinalizar os 49 códigos como critérios desta macro.
este 49 códigos encontra-se em um aba chamada itens. (celula A2 a A50)
Código: Selecionar todosSub DelUFVz()
FinalRow = Range("A65536").End(xlUp).Row
i = 2
Do While i <= FinalRow
If (Cells(i, 1) <> "MG" And Cells(i, 1) <> "PB" And Cells(i, 1) <> "PI") Or Cells(i, 1) = "" Then
Cells(i, 1).EntireRow.Delete
FinalRow = FinalRow - 1
Else
i = i + 1
End If
Loop
End Sub
Excluir linhas usando VARIOS critério
Enviado: 05 Out 2016 às 02:30
por DJunqueira
Uma solução fácil sem macro seria filtrar estes 49 códigos, a não ser q vc vá fazer isso com frequência.
Excluir linhas usando VARIOS critério
Enviado: 05 Out 2016 às 06:05
por ljrbrasil
Preciso fazer isso com frequência.
Obs estes 49 códigos tem que focar preciso excluir as demais linhas.
Excluir linhas usando VARIOS critério
Enviado: 05 Out 2016 às 06:25
por DJunqueira
Esse código q vc arranjou vai apagar uma linha por vez de 50.072 linhas, tá doido!
Monta uma coluna auxiliar, procura o código q vc quer na tabela de 49 códigos (PROCV) e se encontrar retorna 1, senão 0, depois ordena e apaga todo o resto de uma única vez.
Dependendo da sua versão do Excel é possível fazer isso com Nova Consulta / Power Query.
Re: Excluir linhas usando VARIOS critério
Enviado: 05 Out 2016 às 07:38
por ljrbrasil
Então pensei algum deste tipo o fato que os 49 codigos eles se repente (pois são vendas).
Re: Excluir linhas usando VARIOS critério
Enviado: 05 Out 2016 às 07:55
por ljrbrasil
Desculpe cara, realmente você me passou uma solução! E que as vezes temos uma planilha com tanta linhas e precisamos de soluções com curto prazo que esquecemos de soluções simples.
Agradeço muito pela ajuda.
Re: Excluir linhas usando VARIOS critério
Enviado: 05 Out 2016 às 08:47
por alexandrevba
Bom dia!!
Sua dúvida já foi resolvida?
Se sim, eu posso marcar o tópico como resolvido?
se não, você pretende remover as linhas que tenha valores iguais ou diferentes a determinado critério?
Att
Re: Excluir linhas usando VARIOS critério
Enviado: 05 Out 2016 às 16:45
por ljrbrasil
Bom o que o nosso amigo Dj sugeriu, mas se puder colocar a sugestão também e interessante.
posteriomente poderemos fechar o topico.
mas agradeço a todos desde já.
Re: Excluir linhas usando VARIOS critério
Enviado: 06 Out 2016 às 08:28
por alexandrevba
Bom dia!!
se não, você pretende remover as linhas que tenha valores iguais ou diferentes a determinado critério?
Você não respondeu a ultima pergunta.
Os filtros em VBA no geral, são mais rápidos do que Loop's.
Caso pretende deletar valores iguais, veja no link abaixo.
http://www.rondebruin.nl/win/winfiles/M ... teCode.txt
Att