ich bin gerade dabei, für meine Diplomarbeit Datensätze auszuwerten. Diese haben unterschiedliche Längen und deshalb muss das letzte Element abhängig vom Datensatz bestimmt werden. Zu dem Thema gibt es ja schon zahlreiche Foreneinträge, für meinen konkreten Fall habe ich trotzdem keine Lösung für mich ableiten können :(
Ich habe den Macro Recorder benutzt und mir alles so formatiert (u.a. Liste aktiviert) wie ichs haben möchte. Dabei habe ich in die erste Zeile von Spalte N bis V Formeln eingegeben die ich da verwenden möchte und diese dann an der Nase "runtergezogen", damit sie für alle Zeilen gelten. Konkret ergab das:
Selection.AutoFill Destination:=Range("N6:V3371"), Type:=xlFillDefault
Mit anderen Worten hat der Macro Recorder den Autofill von N6:V3371 ausgeführt, wobei 3371 meine letzte Zeile ist. Soweit so gut.
Nun wird sich die letzte Zeile allerdings auch ändern mit dem Datensatz. Daher speicher ich mit
Dim Ende As Long
With ActiveSheet
Ende = .Cells(Rows.Count, 2).End(xlUp).Row - 1
End With
die letzte Zeile der zweiten Spalte in "Ende" was für meinen Anwendungsfall richtig ist.
Nun möchte ich "Ende" für den Autofill verwenden, so dass in Spalte V die letzte Zeile verwendet wird. Ich habe zB schon so was versucht:
'Selection.AutoFill Destination:=Range("N6:V &Ende"), Type:=xlFillDefault
aber das hat nicht funktioniert. Ich möchte in Spalte V also die Zeile "Ende" ansprechen und am besten direkt in die Klammer nach Range einfügen.
Ich freue mich über Eure Hilfe!
Viele Grüße,
Sascha