Was ist das Problem...?
27.06.2016 06:52:25
Rich
ich schreibe gerade was, um unsere Statistik auf Knopfdruck zu erledigen. Dazu habe ich auf einem Sheet zwei Buttons.
Der erste läuft ohne weiteres durch. Bei dem Zweiten habe ich jetzt erst angefangen und wollte aus meiner Sheet "Listen" war rauskopieren. Aber er spinnt schon bei der Ermittlung der letzten Zeile...
Er bring einen Laufzeitfehler 1004 bei "ListenZeile = ..."
Den gleichen Code (andere Variable) habe ich zuvor bei dem anderen Button ohne Probleme benutzt.
Ich bin Neuling mit VBA-Codes usw. und hab mir das in den letzten zwei Wochen erst mit Mühe angeeignet, daher etwas Nachsicht mit mir ;)
Private Sub CommandButton2_Click()
Dim Listen As Worksheet
Dim JahrStat As Worksheet
Dim ListenZeile As Long
Set Listen = Worksheets("Listen")
Set JahrStat = Worksheets("Jahresstatistik")
ListenZeile = Listen.Cells(Rows.Count, 1).End(x1Up).Row
Listen.Range("A17", Cells(ListenZeile, 1)).Copy JahrStat.Range("A12")
End Sub
Danke schon im Voraus für Hilfe/Tipps.