ich habe ein kleines prob mit meinem langen excel sheet..
..es besteht aus mehreren spalten und ziemlich vielen zeilen.
in spalte c sind teilweise!! durchgehend werte eingetragen,wobei einige werte in aufeinanderfolgenden zellen identisch sind. ich möchte nun ein kleines programm schreiben, das mir zwischen jene zellen in Spalte c, deren aufeinanderfolgende Werte NICHT identisch sind,eine leere Reihe einfügt. Folgenden Sourcecode habe ich bereits geschrieben:
....
Set c = Range("c8,c5000")
lastrow = Worksheets("Book1").Range("c65536").End(xlUp).Row
For i = 9 To lastrow
If c.cells(i, 3).Value c.cells(i + 1, 3).Value Then
Rows(i).Insert
End If
Next
...
das problem besteht nun darin, dass dieser sourcecode mir bis zum ende der datensätze komplett leere Reihen einfügt, und anschließend die ursprüngliche tabelle fortsetzt.
Kann mir jemand helfen? Wär korrekt
Greetz
LUKE;)