Guten morgen,
ich habe mit folgendem Code (aus den XLS-FAQ - besten Dank!) dem User die Mgl. eingeräumt, Start und Endzeile für den Druckbereich einstellen zu können. Meine Frage ist nun: Wie kann ich es so einstellen, dass z.B. Linien 1-5 (wegen einer Überschrift) IMMER mitgedruckt werden sollen und der Rest variabel eingestellt werden kann? Danke für jede Antwort.
Dim rng As Range
Dim vstart As Variant, vend As Variant
vstart = Application.InputBox( _
prompt:="Please enter the startrow:")
If vstart = "" Then Exit Sub
vend = Application.InputBox( _
prompt:="Please enter the endrow:")
If vend = "" Then Exit Sub
Set rng = Range("A" & vstart & ":I" & vend)
rng.PrintPreview
End Sub