ich habe ein Tabellenblatt mit einer Liste an Orten.
Im 2. Tabellenblatt habe ich eine Liste mit Orten die in Blatt 1 entfernt werden sollen.
Wie gehe ich da vor? Ist ähnlich dem "doppelte finden", sie sollen aber entfernt werden.
Danke,
Bernd
Sub Manipul1()
Dim C As Range
For Each C In Worksheets("Tabelle1").Range("A2:A100")
If WorksheetFunction.CountIf(Worksheets("Tabelle2").Range("A2:A5"), C) Then
C.ClearContents
End If
Next
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen