ich bräuchte noch mal einen Tip von euch.
Ich habe zwei Tabellen. Mit einem Makro möchte ich in Tabelle 2 eine Reihe löschen deren erster Zellwert der aktiven Zelle in Tabelle 1 entspricht.
Sub TEinAuswertungLöschen()
x = 11
weiter:
If Sheets("Auswertung").Cells(x, 2).Value = Sheets("Datenbank").ActiveCells.Value Then
Sheets("Auswertung").Rows(x).Delete
Else
x = x + 1
GoTo weiter
End If
End Sub
Der läuft aber nicht wirklich weil es mit ActiveCells nicht geht.
Wie kann ich das denn anders realisieren?
mit dank im voraus
louis