Usuários do Excel
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Excluir linhas inteiras

2 participantes

Ir para baixo

Excluir linhas inteiras Empty Excluir linhas inteiras

Mensagem por renck Qua Mar 18, 2015 9:12 am

Bom dia,

Tenho várias planilhas que possuem uma determinada palavra na coluna "B". A palavra é "dados".
Preciso excluir linhas inteiras que antecedem a linha que possui esta palavra. Porém, a quantidade de linhas acima da 1ª vez que aparece "dados" não é fixa.
As linhas acima podem ou não conter dados.

Depois, preciso excluir todas linhas que aparecem abaixo destes dados, a partir e inclusive a linha que possui a palavra "total".
As linhas podem ou não conter dados.


Obrigado,

renck
Iniciante
Iniciante

Mensagens : 1
Data de inscrição : 18/03/2015

Ir para o topo Ir para baixo

Excluir linhas inteiras Empty Re: Excluir linhas inteiras

Mensagem por alexandrevba Ter Mar 24, 2015 7:52 am

Bom dia!!

Está complicado entender o que você quer!!
Código:
Sub AleVBA_194()
    Dim Lastrow As Long
    Application.ScreenUpdating = False
        Lastrow = Cells.Find("*", , , , xlByRows, xlPrevious).Row
        With Range("A1:X" & Lastrow)
            .AutoFilter Field:=2, Criteria1:="<>dados"
        End With
        Range("A2:X" & Lastrow).EntireRow.Delete
    ActiveSheet.AutoFilterMode = False
    Application.ScreenUpdating = True
End Sub
Att
alexandrevba
alexandrevba
Intermediário
Intermediário

Mensagens : 222
Data de inscrição : 26/06/2012
Localização : Serra-ES

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos