Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 18:04:29
18.04.2024 16:33:24
Anzeige
Archiv - Navigation
1480to1484
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeilen automatisch löschen

Zeilen automatisch löschen
16.03.2016 15:06:43
Jürgen
Hallo Excelaner,
ich möchte mir die Arbeit erleichtern, bisher lösche ich die entsprechneden Zeilen per Hand, und das können schon mal bis zu 1500 Zeilen sein.
Es muss doch aber möglich sein das zu automatisieren.
Alle Einzelheiten in der beigefügten Tabelle.
Besten dank schon mal für die Antworten!
Gruß
Jürgen
https://www.herber.de/bbs/user/104382.xlsx

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen automatisch löschen
16.03.2016 15:22:11
Daniel
Hi
Zeilenlöschen mit Bedinung geht seit Excel 2007 am besten so (egal ob von Hand oder mit Makro)
1. denke dir eine Formel aus, welche alle Zeilen, die gelöscht werden sollen mit 0 markiert und die die stehen bleiben müssen mit der jeweiligen Zeilennummer.
schreibe diese Formel in eine Hilfsspalte.
2. schreibe in die Überschriftenzeile der Hilfsspalte die 0
3. wende auf die ganze Tabelle die die Funktion DATEN - DATENTOOLS - DUPLIAKTE ENTFERNEN an, mit der Hilfsspalte als Kriterium und der Option "keine Überschrift"
4. Lösche die Hilfsspalte wieder
für dein Beispiel wäre die Formel (für Zeile 2): =WENN(SUMMEWENN(G:G;G2;I:I)=0;0;ZEILE())

als Makro dann so:

With ActiveSheet.Usedrange
With .columns(.columns.count + 1)
.FormulaR1C1 = "=IF(SumIf(C7,RC7,C9)=0,0,Row())"
.cells(1, 1).value = 0
.EntireRow.RemoveDuplicates .column, xlno
.clearContents
End With
End with
Gruß Daniel

Anzeige
AW: Zeilen automatisch löschen
16.03.2016 17:06:49
Jürgen
Vielen Dank an Daniel!
Das hilft schon mal sehr viel weiter.
Gruß
Jürgen

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige