Ich habe 3 Spalten und eine variable Anzahl an Zeilen.
Nun möchte ich, das per Button, bis zur letzten beschrieben Zeile alles ausgedruckt wird.
Wie sieht der Code dazu aus?
Gruß
Thomas
Dim LZ As Long
LZ = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
ActiveSheet.Range("A1:C" & LZ).PrintOut
dennoch druckt er mir mehrere Seite aus.