So drucken Sie ungerade & sogar Seiten in Excel 2007

Während Microsoft Excel 2007 eine Vielzahl von Optionen aus dem Menü "Drucken" auf der Symbolleiste bietet, geben es nicht Ihnen die Möglichkeit, gerade oder ungerade Seiten drucken. Glücklicherweise gibt es ein Tool, das Sie verwenden können, um gerade und ungerade Seiten drucken: Visual Basic für Applikationen (VBA). VBA ist in Excel 2007 integriert und können Sie Excel Ihren Bedürfnissen anpassen. Dazu zählt das Ausführen von Makros (Programme, die eine bestimmte Aufgabe ausführen).

Anweisungen

1 Klicken Sie auf die Registerkarte "Entwicklertools" in Excel 2007.

2 Klicken Sie auf "Visual Basic" Öffnen Sie den Visual Basic-Editor (VBE).

3 Klicken Sie auf "Einfügen", dann "Module", um ein leeres Modulfenster öffnen.

4 Kopieren Sie und fügen Sie den folgenden Code in das Modulfenster ein:

Sub PrintOddEven()

Dim TotalPages As Long

Dim StartPage As Long

Dim Page As Integer

StartPage = InputBox("Enter starting page number")

TotalPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")

If StartPage > 0 And StartPage <= TotalPages Then

For Page = StartPage To TotalPages Step 2

ActiveSheet.PrintOut From:=Page, To:=Page, _

Copies:=1, Collate:=True

Next

End If

EndSub

5 Drücken Sie "F5", um das Makro auszuführen. Ein Popup-Fenster erscheint, und Sie kehren zu der Excel-Kalkulationstabelle.

6 Geben Sie in das Textfeld die Anfangsseitenzahl. Wenn Sie ungerade Seiten drucken möchten, geben Sie eine ungerade Zahl. Wenn Sie gerade Seiten drucken möchten, geben Sie eine gerade Zahl. Excel druckt gerade oder ungerade Seiten aus diesem Startpunkt. Wenn Sie "1" eingeben, wird Excel beispielsweise ungerade Seiten 1 bis zum Ende des Dokuments gedruckt.

Tipps & Warnungen

• Wenn die Registerkarte Entwicklertools, klicken Sie auf die Schaltfläche "Microsoft Office" nicht angezeigt wird, klicken Sie auf "Excel-Optionen."
• Klicken Sie "Popular", dann auf der Registerkarte "Show Developer" das Kontrollkästchen "Ribbon".