Anzeige
Archiv - Navigation
1004to1008
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Druckbereich mit Makro festlegen

Druckbereich mit Makro festlegen
01.09.2008 17:24:00
Steffi
Hallo liebe Spezialisten.
Könnt Ihr mir den Code für mein Problem nennen?
Bei dem mit der der Maus markierten Bereich soll via Makro der Druckbereich festgelegt werden, und mit dem Standartdrucker gedruckt werden.
Würde mich über Eure Hilfe sehr freuen.
Gruß
Steffi

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Druckbereich mit Makro festlegen
01.09.2008 17:29:00
Andi
Hi,
probier mal dies (mangels Drucker leider ungetestet):

Sub drucken()
With ActiveSheet
.PageSetup.PrintArea = Selection.Address
.PrintOut
End With
End Sub


Schönen Gruß,
Andi

AW: Druckbereich mit Makro festlegen
01.09.2008 17:48:44
Steffi
Hallo Andi,
vielen Dank, das hilft mir schon einmal richtig weiter :-)
Kann man dabei auch das Druckformat automatisch auf Querformat , und nach dem Druck eventuell wieder zurück auf Hochformat stellen.
Lieben Gruß
Steffi
AW: Druckbereich mit Makro festlegen
01.09.2008 17:56:07
Uduuh
Hallo,
klar

Sub tt()
With ActiveSheet
With .PageSetup
.Orientation = xlLandscape
.PrintArea = Selection.Address
End With
.PrintOut
With .PageSetup
.Orientation = xlPortrait
.PrintArea = ""
End With
End With
End Sub


Anzeige
DANKE
01.09.2008 18:03:00
Steffi
Super, vielen lieben Dank und Gruß
Steffi

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige