ich möchte gerne per VBA die Ergebnisse eines dynamisch gefilterten Blattes löschen.
Bisher habe ich dafür folgenden Code, der grundsätzlich auch funktioniert.
Kann mir jemand sagen, was ich hier noch ändern muss, damit auch folgendes gegeben ist ?
1) Wie erreiche ich, dass Zeile 1, d.h. die Titel des Filters generell nicht gelöscht werden (ich hatte hier evtl. an Offset gedacht) ?
2) Wie verhindere ich eine Fehlermeldung, wenn der Filter keine Ergebnisse liefert, d.h. wenn nach dem Filtern nur Zeile 1 bzw. die Titel zu sehen sind ?
Mein Code:
With varTargetSheet
.Range("A:Z").SpecialCells(xlCellTypeVisible).EntireRow.Delete
.Cells.AutoFilter
End With
Vielen Dank im Voraus für Eure Hilfe, Markus