Gefilterte Daten entfernen VBA

Ich habe ein Makro, das Daten filtert und ich möchte die Daten in der Spalte löschen. Der Code, den ich habe (unten) tut dies, aber es löscht alle Daten in der Spalte. Ich brauche die Daten entfernt werden, so dass die Zelle immer noch leer ist nicht gelöscht.Gefilterte Daten entfernen VBA

Range("A1:AC1").AutoFilter 
Range("A1:AC1").AutoFilter Field:=17, Criteria1:="0.00", Operator:=xlFilterValues 
Range("Q4:Q1000").SpecialCells(xlCellTypeVisible).Delete

Quelle

2016-11-22 Luke Turnbull

??? 'Bereich (" Q4: Q1000 "). Spezialzellen (xlCellTypeVisible) .Clear' ??? –

Sie brauchen nicht die erste Autofilter-Codezeile – user1

Replace:

Range("Q4:Q1000").SpecialCells(xlCellTypeVisible).Delete

mit:

Range("Q4:Q1000").SpecialCells(xlCellTypeVisible).Clear

Quelle

2016-11-22 14:33:18

Perfect prost! –

@LukeTurnbull Denken Sie daran, wenn es funktioniert, bitte markieren Sie als Antwort angenommen, damit andere wissen :) – Sgdva

Gefilterte Daten entfernen VBA

Antwort

Verwandte Themen