Hallo,
ich möchte Tabellenblätter löschen, deren Name den Eintrag einer ausgewählten Zelle enthält.
Bsp.
Zellwert = Kosten
Tabellenname = Kostenrechnung
Wären beide gleich, könnte ich
If ActiveCell.Value = Blatt.Name Then
Sheets(Blatt.Name).Activate
ActiveSheet.Delete
anwenden.
Problem ist eben, dass der Zellwert und Tabellenname nicht exakt übereinstimmen, sondern der Zellwert nur einen Teilbereich des Tabellennamens enthält.
Gibt es hierfür einen entspr. Code?
Danke im Voraus!
Daniela
|