Tara erhält häufig Arbeitsmappen mit einem einzelnen Arbeitsblatt, in denen einige Informationen im Arbeitsblatt Text enthalten, der „durchgestrichen“ ist (der Text wird durchgestrichen formatiert). Zeilen, die durchgestrichenen Text enthalten, müssen gelöscht werden, aber Tara ist sich nicht sicher, wie sie dies schnell tun soll.

Wenn Sie diese Aufgabe nur gelegentlich ausführen müssen, helfen Ihnen die folgenden Schritte, wenn Sie leicht erkennen können, welche Zellen die durchgestrichene Formatierung enthalten:

  1. Klicken Sie auf die linke Seite der ersten Zeile, die Sie auswählen möchten – die erste, die durchgestrichenen Text enthält. Die gesamte Zeile sollte ausgewählt werden.

  2. Halten Sie die Strg-Taste gedrückt, während Sie auf die linke Seite zusätzlicher Zeilen klicken, die Sie löschen möchten. (Sie erstellen einen Auswahlsatz von zu löschenden Zeilen.)

  3. Drücken Sie Strg + – (die Minus-Taste). Die Zeilen werden gelöscht.

Wenn es nicht so einfach ist, alle Zeilen mit durchgestrichenem Text zu sehen, können Sie sich auf die Suchfunktion verlassen, um sie für Sie zu finden:

  1. Drücken Sie Strg + F. Excel zeigt die Registerkarte Suchen des Dialogfelds Suchen und Ersetzen an.

  2. Klicken Sie auf die Schaltfläche Optionen, um die verfügbaren Optionen im Dialogfeld zu erweitern.

  3. Stellen Sie sicher, dass das Feld Suchen nach leer ist, und platzieren Sie die Einfügemarke in diesem Feld.

  4. Klicken Sie auf die Schaltfläche Format. Excel zeigt das Dialogfeld Format suchen an.

  5. Stellen Sie sicher, dass die Registerkarte Schriftart sichtbar ist. (Es wird wahrscheinlich standardmäßig angezeigt.)

  6. Aktivieren Sie das Kontrollkästchen Durchgestrichen ein oder zwei Mal, bis Sie sehen, dass es ausgewählt ist. (Sie sollten im Dialogfeld nichts anderes ändern müssen.)

  7. Klicken Sie auf OK, um das Dialogfeld Format suchen zu schließen.

  8. Klicken Sie auf Alle finden. Das Dialogfeld Suchen und Ersetzen wird erweitert, um anzuzeigen, welche Zellen durchgestrichene Formatierungen enthalten, und das erste Ergebnis (im Dialogfeld) wird ausgewählt.

  9. Drücken Sie Strg + A. Dadurch werden alle Ergebnisse im Dialogfeld ausgewählt.

  10. Klicken Sie auf Schließen, um das Dialogfeld Format suchen zu schließen. Alle Zellen, die durchgestrichenen Text enthalten, sollten jetzt ausgewählt werden. (Klicken Sie nicht auf eine andere Stelle im Arbeitsblatt, da sonst die Auswahl der Zellen versehentlich aufgehoben wird.)

  11. Drücken Sie Strg + – (die Minus-Taste). Excel zeigt das Dialogfeld Löschen an.

  12. Klicken Sie auf das Optionsfeld Ganze Zeile.

  13. OK klicken. Die Zeilen werden gelöscht.

Dieser Ansatz hat einen Nachteil: Er findet keine Zellen mit gemischter Formatierung. Mit anderen Worten, wenn nur ein Teil des Textes in der Zelle das durchgestrichene Attribut verwendet, wird diese Zelle in Schritt 8 nicht gefunden.

Dieser Mangel kann mit einem Makro behoben werden. Außerdem ist ein Makro ein guter Ansatz, wenn Sie diese Aufgabe häufig ausführen müssen. Hier ist eine, die den Trick macht:

Sub DeleteSTRows()

Dim c As Range     Dim bCheck As Boolean     Dim J As Integer     Dim iRows As Integer

iRows = Selection.Rows.Count     If iRows > 2 Then         For J = iRows To 1 Step -1             bCheck = False             For Each c In Selection.Rows(J).Cells                 bCheck = IsNull(c.Font.Strikethrough)

If Not bCheck Then bCheck = c.Font.Strikethrough                 If bCheck Then Exit For             Next c             If bCheck Then Selection.Rows(J).EntireRow.Delete         Next J     End If End Sub

Um das Makro zu verwenden, wählen Sie einfach die Zellen aus, die Sie beeinflussen möchten, und führen Sie es dann aus. Das Makro durchläuft jede Zeile der Auswahl (von der letzten bis zur ersten Zeile) und überprüft dann jede Zelle in diesen Zeilen. Wenn die Zelle durchgestrichenen Text enthält, wird ein Flag (bCheck) gesetzt und die gesamte Zeile gelöscht. (Das Makro funktioniert nicht, wenn Ihre Auswahl nur 1 oder 2 Zeilen enthält. Diese wenigen Zeilen können leicht manuell überprüft und angepasst werden.)

Beachten Sie in der Mitte des Makros, dass die IsNull-Funktion verwendet wird. Dies ist der Teil, der erkennt, ob die Zelle eine gemischte Formatierung enthält. Wenn nur einige der Zeichen in der Zelle Strike-Through verwenden, wird von der Strikethrough-Eigenschaft ein Nullwert zurückgegeben. Dies wird von IsNull geprüft und der Variablen bCheck zugewiesen. Wenn bCheck immer noch False ist (was bedeutet, dass in der Zelle kein gemischter Durchschlag verwendet wird), wird die gesamte Zelle überprüft, um festzustellen, ob sie die erforderliche Formatierung aufweist.

Es ist zu beachten, dass Sie die .Delete-Methode im Makro durch die .Clear-Methode ersetzen können, wenn Sie nicht möchten, dass das Makro tatsächlich Zeilen löscht, sondern diese nur löschen möchten.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (5270) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365.