Zeilen löschen

Bild

Betrifft: Zeilen löschen
von: Jessi
Geschrieben am: 04.11.2015 12:52:34

Hallo :)
Ich würde gerne mit Hilfe eines Makros Zeilen in einer Excel-Tabelle löschen.
Das Makro soll die Zeile immer dann löschen wenn "Falsch" angezeigt wird. Das wird allerdings durch Formel erzeugt:
=ODER(IDENTISCH($E72;$G$9:$G$828))
Also wenn diese Formel als Ergebnis "FALSCH" ausweist soll die entsprechende Zeile gelöscht werden.
Vielen Dank im Voraus :)

Bild

Betrifft: AW: Zeilen löschen
von: Bernd
Geschrieben am: 04.11.2015 12:55:06
Hi,
guckst Du hier:
https://www.herber.de/forum/archiv/824to828/826393_Marko_soll_Zeilen_loeschen_wenn_Inhalt_Falschquot.html
mfg Bernd

Bild

Betrifft: AW: Zeilen löschen
von: daniel
Geschrieben am: 04.11.2015 13:07:45
Hi
erweitere die Formel so:
=Wenn(ODER(IDENTISCH($E72;$G$9:$G$828));Zeile();0)
schreibe in die Überschriftenzeile der Spalte die 0
Wende auf die ganze Tabelle die Funktion DATEN - DATENTOOLS - DUPLIAKTE ENTFERNEN an, mit dieser Spalte als Kriterium.
Geht natürlich auch per Makrol
der Befehl für das Duplikate-Entfernen ist RemoveDuplicates
weitere Infos gibt dir die Hilfe oder der Recorder.
Gruß Daniel

Bild

Betrifft: AW: Zeilen löschen
von: Jessi
Geschrieben am: 04.11.2015 13:57:18
Danke das klappt zwar, aber es stehen in den Spalten vorher noch Werte die quasi dazu gehören.
Also bräuchte ich eine Lösung wie die kompletten Zeilen verschwinden.
Gruß
Jessi

Bild

Betrifft: AW: Zeilen löschen
von: daniel
Geschrieben am: 04.11.2015 14:04:30
Hi
dann gib beim RemoveDuplicates vor dem Befehl die ganze Zeile ein und im ersten Parameter die Spaltennummer der Spalte, die für die Duplikatsprüfung verwendet werden soll (dh die Spalte mit der Formel.
sieht dann in etwa so aus

Rows("1:100").RemoveDuplicates 26, xlno
dh hier würden die Zeilen 1-100 bearbeitet und für die Dupliaktsprüfung wird die 26. Spalte dieses Bereichs verwendet.
Gruß Daniel

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Zeilen löschen"