online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon jeany vom 04.02.2020, 11:46 Options

Zusammengehörige Zeilen nach Kriterium prüfen, ggf. löschen

hallihallo :)

ich möchte aus einer mehrere tausend Zeilen umfassenden Tabelle (mit Fertigungsaufträgen) zusammengehörende Zeilen (gekennzeichnet durch gleiche Vorgangsnummer) auf ein Kriterium prüfen (ob eine Kostenstelle in diesen Vorgängen vorhanden ist).
Diese Vorgänge können jedoch von Auftrag zu Auftrag eine unterschiedliche Anzahl an Zeilen besitzen.. welches mir die Prüfung erheblich erschwert.

Dieser Code hebt schonmal unterschiedlíche Vorgänge farblich hevor:

Private Sub CommandButton1_Click() 
Call Farbformatierung(Cells()) 
End 

SubPrivate Sub Worksheet_Change(ByVal Target As Range)  
Call Farbformatierung(Target) 
End Sub 

Sub Farbformatierung(Zellen As Range)  
Dim Status As Boolean, n As Long  
Farbe = Array(3, 34) 
Status = True  
SpalteWert = 3 
Startzeile = 2 
SpalteErste = 1 
SpalteLetzte = 6 

n = Startzeile  While Cells(n, SpalteWert)    
If Cells(n, SpalteWert) <> Cells(n - 1, SpalteWert) Then Status = Not Status    Range(Cells(n, SpalteErste), Cells(n, SpalteLetzte)).Interior.ColorIndex = Farbe(Status * -1)    
n = n + 1  
Wend 

End Sub


Jetzt weiß ich allerdings nicht mehr weiter..
Kann mir bitte jemand die Bedingung/Abfrage in VBA nennen mit der ich ganze zusammengehörende Zeilen (gleiche Vorgangsnummer) auf ein Kriterium abtasten und bei Eintreten des Ereignisses löschen kann?

Danke im Voraus :)


Antwort schreiben

Antwort 1 von Saarbauer vom 05.02.2020, 10:54 Options

Hallo,

ein paar Fragen:

1. wo steht dein Löschkriterium? Vermute Spalte 3

2. ist es ein fester Wert, dein Löschkriterium? Feste Kostenstelle oder unterschiedliche Kostenstellen?

3. soll grundsätzlich gelöscht werden bei dem angegebenen Löschkriterium?

Gruß

Helmut

Ähnliche Themen

Zeilen löschen nach bestimmter Uhrzeit
andrepopo  08.01.2007 - 77 Hits - 7 Antworten

Zeilen löschen
Aloha089  14.02.2007 - 79 Hits -

Excel Zeilen löschen
Smart79  07.09.2007 - 291 Hits -

zeilen löschen
SARP  19.12.2007 - 147 Hits - 1 Antwort

Zeilen mit leeren Zellen löschen
brs  16.06.2008 - 301 Hits - 7 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Mon Jan 26 01:23:17 2026