
Ich habe eine Excel-Tabelle mit einigen tausend Zeilen, die ungefähr wie folgt aussieht:
A1 B1
9-1 Apfel
9-2 Ananas
10-1 Traube
10-2 Orange
10-3 Birne
11-1 Zitrone
Gibt es ein VBA-Skript, das die Zeilen löschen kann, die nach der Zahl etwas anderes als eine "-1" enthalten? Das Ergebnis sollte dann so aussehen:
A1 B1
9-1 Apfel
10-1 Traube
11-1 Zitrone
Die Anzahl der Variationen für jede erste Ziffer variiert. Manchmal kann es nur 1 sein, während es manchmal bis zu 8 oder 9 sein können. Sie müssen nur die „-1“ jeder Zeile behalten und den Rest löschen.
Vielen Dank im Voraus.
Antwort1
Hier ist eine schnelle und einfache Möglichkeit, dies zu tun:
Geben Sie in C1 (oder Ihrer ersten verfügbaren Spalte) die Formel ein
=FIND(-1,A1)
. Doppelklicken Sie oder ziehen Sie den Zellgriff, um die Formel ganz nach unten in alle Zeilen zu kopieren. Jetzt-1
sollten die Zellen, die enthalten, eine Zahl enthalten und die anderen sollten lauten#VALUE!
.Wählen Sie die gesamte Spalte C aus und drücken Sie Ctrl+ F. Klicken Sie auf
Options
. Geben Sie#value!
in einFind what
, ändern Sie dasLook in:
Feld inValues
und drücken SieFind All
. Drücken Sie dann Ctrl+ A, klicken Sie mit der rechten Maustaste auf eine der markierten Zellen, wählen Sie ausDelete
, ändern Sie inEntire row
und drücken SieOK
.