Ausgabe 6/2012

BENUTZER ONLINE:
1696

Home > Praxis & Hilfe > Kummerkasten > Office > Artikel 33502

Excel-Makro um quer oder hoch auszudrucken

Problem: Im Büro drucken wir täglich mehrmals markierte Teilbereiche aus umfangreichen Excel-Tabellen. Für diesen Vorgang habe ich ein Makro erstellt. Je die Hälfte dieser Drucke benötigen wir im Hoch-, die andere Hälfte im Querformat. Ist Ihnen eine Möglichkeit bekannt, diese Einstellungen des Druckers jeweils in einem Makro abzulegen? Also so etwas wie „DruckMarkiertQuer“ und „DruckMarkiertHoch“. Das klappt bei mir nicht. Ist Ihnen eine Lösung bekannt?

von Monica Hubacher (17.06.2006)

Lösung: Die Einstellung des Hoch- oder Querformats per Makro muss in der Seiteneinrichtung erfolgen, dann klappt das auch. In den folgenden Makros wird beim Querformat zuerst das Format auf Quer umgestellt und nach dem Ausdrucken des markierten Bereichs wieder zurück zum Hochfomat geschaltet. Beim Hochformat wird einfach sichergestellt, dass das Hochformat eingestellt ist. Das wird dann nach dem Ausdruck so belassen (kann aber natürlich auch ergänzt werden, damit am Ende das Querformat eingestellt ist).

Hier die beiden Makros, die Sie kopieren und in ein Modul ihrer Arbeitsmappe einfügen können:

-----------------------------------------------

Sub Quer()
ActiveSheet.PageSetup.Orientation = xlLandscape
Selection.PrintOut Copies:=1, Collate:=True
ActiveSheet.PageSetup.Orientation = xlPortrait
End Sub

-----------------------------------------------

Sub Hoch()
ActiveSheet.PageSetup.Orientation = xlPortrait
Selection.PrintOut Copies:=1, Collate:=True
End Sub

-----------------------------------------------

Drucken

Weiterempfehlen

Kommentieren

Social Bookmarks

Favoriten Twitter Facebook WordPress Blogger

Wählen Sie:

Windows 7
Windows 2000
Windows XP
Windows Vista
Linux
Mac
Sicherheit
Internet
Office
Multimedia
Spiele
Hardware
Windows9x/NT
Mobile
Sonstiges

Ähnliche Themen

Word ohne «Dokument 1» starten

Wie kann ich Microsoft Word starten, ohne dass eine leere Datei «Dokument1» angezeigt wird?

Excel 2007: Wann und vom wem zuletzt gespeichert?

Problem: An einer Excel-Datei arbeiten verschiedene Mitarbeiter. Nun möchte ich, dass beim Schliessen der Datei in bestimmten Zellen automatisch bestimmte...

LibreOffice Calc: Zellen per Formel einfärben

Problem: In der «Tabelle3» habe ich folgende Formel: =WENN(Tabelle2.A1>=100;"grün";"rot"). Nun möchte ich, dass anstelle der Wörter «grün» oder «rot»...

Excel: Zellbezeichnung zusammensetzen

Problem: Ich möchte eine Zelle anhand der Inhalte zweier anderer Zellen adressieren. Zum Beispiel steht in A1 der Wert «C», in B1 steht «1» und in C1...

Excel: Hyperlink per Formel

Problem: Ich führe eine Tabelle mit drei Spalten. In der Spalte A sind Stichwörter, in Spalte B ein Hyperlink zum Anklicken. Ich möchte in der Spalte...

Mehr Praxis & Hilfe

Fachchinesisch

Mühe mit Computerbegriffen?

Im Fachchinesen finden Sie 743 Erklärungen.

AKTUELLE KUMMERKASTEN

Outlook-Kontakte aus Excel importieren

Problem: Ich habe in Excel 2010 eine Adressliste, die ich in Outlook 2010 importieren möchte. Auf dem Tabellenblatt habe ich in der ersten Zeile Spaltenüberschriften...

Suchen in Google Mail

Problem: Irgendwie sollte man in Google-Mail übers Webinterface doch ausgezeichnet suchen können. Aber wenn ich einen Suchbegriff ins Feld oberhalb der...

Mehr Artikel

Leser empfehlen

Dropdown-Liste in Excel erstellen

Problem: Ich möchte in den einzelnen Feldern der Tabelle eine Dropdown-Liste zur Auswahl der Kriterien einfügen. Wie geht das?

ASCII-Tabelle für Sonderzeichen

Ich arbeite häufig mit der Sonderzeichentabelle in Word. Mir ist es aber zu umständlich, ständig die Tabelle zu öffnen, um das Zeichen in den Text einzufügen....

Windows XP im abgesicherten Modus starten

Kann ich Windows XP auch im abgesicherten Modus starten?

Frustfreier Download bei www.pctipp.ch

Problem: Wenn ich aus den PCtipp-Downloads ein File herunterladen will, erscheint die Aufforderung, ein PCtipp-Abo zu lösen. Ich kaufe den PCtipp aber...

Firefox: Neuer Tab mit Startseite?

Problem: Wenn ich im Firefox via Ctrl+T oder «Datei/Neuer Tab» einen neuen Tab öffne, wird in diesem immer eine leere Seite (about:blank) angezeigt. Ich...

Mehr Tipps & Tricks