Macro que delete linhas das células contendo o número zero

[raurosan]

Olá galera do Tomás Vásquez.
Estou engatinhando no uso de macros do Excel e preciso de ajuda para terminar um trabalho filantrópico que resolvi abraçar.
Eu preciso criar uma Macro no Excel para deletar todas as linhas que estejam vazias e as que contenham o número zero na coluna "L" da "plan2", apenas isto.
Encontrei aqui neste fórum esta macro abaixo e que funciona perfeitamente para deletar as linhas vazias mas eu preciso também deletar as células com número 0 e não consigo modificar esta macro para esta finalidade.

Sub ApagaLinhasVazias()
Sheets("Todos Invoice").Select
Columns("L:L").Select 'Adapte para a coluna que quiser
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.EntireRow.Delete
Range("l3").Select
End Sub

Agradeço antecipadamente a todos que puderem me ajudar, pode ser adaptando a macro acima para deletar as células que contenham o número zero ou uma outra macro que possa cumprir esta finalidade.

[JValq]

Boa noite,

Veja se atende:

Código: Selecionar todos

Sub ApagarCelulas0()
    Dim i As Long
    
    Range("L" & Cells.Rows.Count).End(xlUp).Select
    
    For i = ActiveCell.Row To 1 Step -1
        If Cells(i, "L").Value = 0 And Cells(i, "L").Value <> "" Then
            Rows(i).Delete
        End If
    Next
End Sub

Abraço