Thema

Druckbereich variabel gestalten

Gruppe

Bereich

Problem

Wie kann ich durch die Eingabe einer Zahl zwischen verschiedenen Druckbereichen hin- und herschalten?

Lösung
Nur anhand einer Beipspielarbeitsmappe darstellbar.



StandardModule: Modul1

Sub BereichFestlegen()
   Dim rng As Range
   Set rng = Range(Cells(1, 1), _
      Cells(Cells(1, 2).End(xlDown).Row, 8))
   ActiveSheet.PageSetup.PrintArea = rng.Address
   ActiveSheet.PrintPreview
End Sub

    

Beiträge aus dem Excel-Forum zu den Themen Druck und Bereich