Startseite > Excel, Excel-Inside > Wiederholungszeilen auf einige Seiten per VBA beschränken

Wiederholungszeilen auf einige Seiten per VBA beschränken

Mit diesem VBA-Makro können Wiederholungszeilen auf einige Seiten beschränkt werden. Die Wiederholungszeilen Zeile 1 und Zeile werden hier 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.

Sub Wiederholungs_bedingt()

DIM a%, b%

a = ExecuteExcel4Macro(„Get.Document(50)“)

If a = 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


Weitere Informationen zum Thema VBA, Formeln und weitere umfangreiche Informationen rund um Excel finden Sie auf Excel-Inside.de.

Advertisements
  1. Es gibt noch keine Kommentare.
  1. No trackbacks yet.

Kommentar verfassen

Trage deine Daten unten ein oder klicke ein Icon um dich einzuloggen:

WordPress.com-Logo

Du kommentierst mit Deinem WordPress.com-Konto. Abmelden / Ändern )

Twitter-Bild

Du kommentierst mit Deinem Twitter-Konto. Abmelden / Ändern )

Facebook-Foto

Du kommentierst mit Deinem Facebook-Konto. Abmelden / Ändern )

Google+ Foto

Du kommentierst mit Deinem Google+-Konto. Abmelden / Ändern )

Verbinde mit %s

%d Bloggern gefällt das: