normalerweise lese ich bei einem Problem nur im Forum und muss nicht selbst schreiben. Aber diesmal komme ich nicht weiter und alles Lesen hat nichts gebracht.
Folgendes Problem:
Auf einem Tabellenblatt habe ich eine Tabelle (listobject). Per VBA selektiere ich einen bestimmten Wert und lösche die Zeile. So weit so gut. Wenn der Wert aber nicht vorhanden ist läuft VBA in einen Fehler: "Keine Zellen gefunden". Diesen Fehler will ich jetzt vorher abfangen. Bis jetzt ist mir nur dieser Workaround eingefallen:
If WorksheetFunction.CountIf(rg, "338000") > 0 Then 'Wert ist vorhanden. Löschen kann durchgeführt werden.
Ich frage mich, ob es nicht irgendeine Eigenschaft von listobject gibt, die zeigt, ob der Tabellenfilter Zeilen zeigt oder nicht. Ich habe schon alles mögliche mit Rows.count und Ähnlichem probiert. Wenn Zeilen vorhanden sind, dann funktionieren alle meine Versuche gut. Die Anzahl der Zeilen wird ausgegeben. Aber der Wert 0 (Null) wird nie ausgegeben. Alle meine Versuche laufen immer in die selbe Fehlermeldung.
Vielleicht hat ja jemand eine Idee.
Beste Grüße
Michael