Eliminare righe da tabella in base alla selezione attiva

Question

Buonasera,

In una tabella di Excel ho effettuato una selezione usando il filtro,

avrei la necessità di eliminare le righe visualizzate, con una macro, possibilmente che non passi per la selezione solo celle visibili ...

Grazie per l'aiuto

Answer 1

Un modo semplice in VBA:

Sub Elimina() 

Dim lngRow As Long 

    For lngRow = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1 

        If Cells(lngRow, 1).Value = "ananas" Or Cells(lngRow, 1).Value = "mela" Or Cells(lngRow, 1).Value = "pera" Then 

            Rows(lngRow).Delete 

        End If 

    Next lngRow 

End Sub 

Ciao.

Answer 2

Ottimo, grazie

Grazie a te del riscontro,

ciao.

Answer 3

Ottimo, grazie

Answer 4

cerco di spiegarmi con un esempio: da una lista di articoli devo eliminare tutte le righe contenenti ananas, pera, mela (sempre quelle). Il file in un secondo momento sarà aggiornato da una tabella importata, quindi dovrò eseguire nuovamente l'estrazione, pertanto vorrei rendere automatica l'operazione, per esempio con una macro, per non dover sempre eseguire la selezione manualmente.

Grazie

Answer 5

ciao

possibilmente che non passi per la selezione solo celle visibili

???

metti il nome del filtro su una cella e fai eliminare quelle

o non ho capito cosa vuoi fare