Genau kann ich dir da nicht weiterhelfen, da du nicht angibst warum es bei dir "nicht klappt".
Wichtig zu wissen wäre auch wo genau der Quellcode steht, weil ...
Sheets("Daten").Range(Cells(i, 1), Cells(i, 5))
nicht immer das machen wird was man vielleicht zuerst meint. Hier kommt es darauf an wo genau der Quellcode steht.
Steht er im Blatt Daten, ist alles ok. Steht er in einem anderen Blatt oder in einem Modul und das aktive Blatt ist nicht "Daten", dann wird hier ein Laufzeitfehler kommen. Cells bezieht sich nämlich in einem Modul auf das aktive Blatt und wenn dies nicht (hier im Beispiel) nicht "Daten" ist, dann kommt es zum besagten Laufzeitfehler.
Darum bin ich gleich ganz weg von deinem Stil. Gleichzeitig wollte ich dir gleich noch einige Methoden vostellen, die dich bei deinem Vorhaben gut unterstützen.
Gruß
|