Hallo Excel-Profis,
ihr wart mir schon im ersten Step sehr behilflich bei diesem Step. Ihr konntet mir weiterhelfen, dass eine Zeile zwei Zellen nach ihren ersten Ziffer vergleicht.
For lngRow2 = Cells(Rows.Count, 1).End(xlUp).Row To 3 Step -1
If Left$(Cells(lngRow2, 8), 1) > Left$(Cells(lngRow2 - 1, 8), 1) Then
...
Das klappt prima.
Jetzt hätte ich die Herausforderung, dass zusätzlich zwei andere Zellen mit geprüft werden soll. Vielleicht ob die ersten drei Ziffern unterschiedlich sind, oder was besser wäre, ob die Einträge als ganzes unterschiedlich sind. Vielleicht kann ich hier irgendetwas mit Value einbauen?
For lngRow2 = Cells(Rows.Count, 1).End(xlUp).Row To 3 Step -1
If Left$(Cells(lngRow2, 8), 1) > Left$(Cells(lngRow2 - 1, 8), 1) _
Or Left$(Cells(lngRow2, 7), 1) > Left$(Cells(lngRow2 - 1, 7), 1) Then
...
Könnte Ihr mir hier helfen?
Danke und Viele Grüße und ein schönes WE
Jürgen