Wiederholungszeilen auf einige Seiten beschränken

Mit diesem Makro können Wiederholungszeilen auf einige Seiten beschränkt werden. Standardmäßig werden bei Aktivierung dieser Funktion die Wiederholungszeilen auf allen vorhandenen Seiten ausgegeben.

 

Die Wiederholungszeilen die für  die Zeilen 1 und 2 festgelegt wurden, werden mit dem nachfolgenden Makro nur auf die Seite 1 und 2 gedruckt. Sollen andere Seiten mit Wiederholungszeilen gedruckt werden, so ist der Code entsprechend anzupassen. Ändern sie dazu die For-Next-Schleife entsprechend ab. 

 

{codecitation}

Sub Wiederholungs_bedingt()
'** Wiederholungszeilen auf einige Seiten beschränken

Dim a%, b%
b = ExecuteExcel4Macro("Get.Document(50)")
 
If b = 1 Then Exit Sub
 
ActiveSheet.PageSetup.Order = xlDownThenOver
ActiveSheet.PageSetup.PrintTitleRows = "$1:$2"
 
For a = 1 To b
 
  If a > 3 Then
    ActiveSheet.PageSetup.PrintTitleRows = ""
  End If

  ActiveWindow.SelectedSheets.PrintOut _
  From:=a, To:=a, Copies:=1, Collate:=True
 
Next
 
End Sub

{/codecitation}

Partnerlinks

Relevante Artikel

  • Alle vorhandenen Drucker auslesen

    106009 Das nachfolgende Makro schreibt alle vorhandenen, installierten Drucker auf das erste Sheet in einer Arbeitsmappe. Sie müssen...

  • Druckbereich per VBA festlegen

    Wenn nicht das komplette Tabellenblatt gedruckt werden soll, kann ein sogenannter Druckbereich definiert werden. Damit kann...

  • PDF Datei per VBA erzeugen

    Seit Excel 2007 können PDF-Dateien direkt aus Excel heraus erzeugt werden. Dazu muss die Datei einfach über die Funktion...

  • Drucken der Arbeitsmappe verhindern

    Mit Hilfe des folgenden VBA-Codes kann die Druckfunktion für eine gesamte Arbeitsmappe deaktiviert werden. Damit kann kein...

  • Ausgewählte Tabellenblätter drucken

    Wenn nicht die gesamte Arbeitsmappe sondern nur ausgewählte Tabellenblätter einer Arbeitsmappe gedruckt werden sollen,...

Ihre Zufriedenheit ist unser Ziel, deshalb verwenden wir Cookies. Mit diesen ermöglichen wir, dass unsere Webseite zuverlässig und sicher läuft, wir die Performance im Blick behalten und Sie besser ansprechen können. Cookies werden benötigt, damit technisch alles funktioniert und Sie auch externe Inhalte lesen können. Des Weiteren sammeln wir unter anderem Daten über aufgerufene Seiten, getätigte Käufe oder geklickte Buttons, um so unser Angebot an Sie zu Verbessern. Mehr über unsere verwendeten Dienste erfahren Sie unter „Weitere Informationen“. Mit Klick auf „Akzeptieren“ erklären Sie sich mit der Verwendung dieser Dienste einverstanden. Ihre Einwilligung können Sie jederzeit mit Wirkung auf die Zukunft widerrufen oder ändern.