Wie lösche ich Zeilen in Excel 2007 automatisch basierend auf dem Zellenwert?

Wie lösche ich Zeilen in Excel 2007 automatisch basierend auf dem Zellenwert?

Ich möchte Zeilen in Excel 2007 automatisch löschen, je nachdem, ob in dieser Zeile eine Zelle mit einem bestimmten Wert vorhanden ist oder nicht. Ich habe herumgegoogelt, aber nur alte Informationen zu VBA-Skripten für frühere Excel-Versionen gefunden und bisher funktioniert alles nicht. Ich suche nach einer SuperUser-tauglichen Erklärung, wie das geht.

Antwort1

Dieses Makro löscht Zeilen, die Zellen mit dem Wert „fri“ enthalten, und verschiebt die Zellen dann nach oben. Ersetzen Sie im Code einfach „FRI“ durch den Wert, nach dem Sie suchen möchten. Sie können es auch so ändern, dass ein Wert abgefragt wird oder der Wert einer anderen Zelle als Kriterium verwendet wird.

Sub DeleteThis()

For Each Rng In Selection.Rows
    If (Application.WorksheetFunction.CountIf(Rng, "fri") > 0) Then
        Rng.Delete Shift:=xlUp
    End If
Next Rng

End Sub

Benutzen:Wählen Sie Ihren Datenbereich aus und führen Sie dann das Makro aus.

Beispiel:
vorher:
Bildbeschreibung hier eingeben

nach:
Bildbeschreibung hier eingeben

Nicht-VBA:Sie können die erweiterten Filter von Excel verwenden, um Zeilen auszuwählen, die bestimmte Kriterien erfüllen. Dies kann allerdings etwas Platz auf dem Arbeitsblatt und einige zusätzliche Schritte erfordern.

verwandte Informationen