Hallo Leute
Ich versuch einen Autofilter per VBA zu Filtern und anschliesend die Zellen zu leeren. Allerdings funktioniert es nur bedingt.
Wenn ich die Spalten eingeblendet habe löscht er mir die Zellen, wenn gewisse spalten ausgeblendet sich werden diese Zellen nicht geleert.
Ein Problem habe ich noch das bringe ich nicht zustande wenn er kein "ja" findet dann soll er nichts machen
In Spalte AH wird gefiltert
Spalte Z:BU ist ausgeblendet fals das wichtig wäre
Bereich A22:BU556 der gefilterten Zeilen sollte geleert werden wenn Filter "ja" ist
Danke für eurer Hilfe
mfg
Jürgen
Auszug von dem Code mit der Stelle
ws3.Activate
On Error GoTo Ende
With Worksheets("Holzliste")
.Range("$AH$1:$AH$556").AutoFilter Field:=9, Criteria1:="ja"
.Range("$A$22:$BU$556").SpecialCells(xlCellTypeVisible).ClearContents
.ShowAllData
End With
Ende: