Drucken aus einem Dialog



Excel-Version: 10.0 (Office XP)
nach unten

Betrifft: Drucken aus einem Dialog
von: Mario
Geschrieben am: 14.07.2002 - 19:29:48

Meine Frage:
Wie kann ich aus einem Dialog heraus ein bestimmtes Tabellenblatt ("Telefonliste") drucken lassen ? Der Druckbereich sollte dabei auch berücksichtigt sein.
Beispiel: A2:O31.
Die Aufzeichnung eines Makros, führte bei mir zu keinem
erfolgreichen Ergebnis.
nach oben   nach unten

Geht ganz einfach mit dem Makrorekorder..
von: Ramses
Geschrieben am: 14.07.2002 - 20:59:44

Füge diesen aufgezeichneten Code !! einer Schaltfläche deines Dialoges hinzu:


Sub Makro2()
'
' Makro am 14.07.2002 von Rainer aufgezeichnet
'
'Das ist wichtig !! welche Tabelle gedruckt werden soll
    Sheets("Telefonliste").Select
    Range("A2:O31").Select
    ActiveSheet.PageSetup.PrintArea = "$A$2:$O$31"
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
    ActiveSheet.PageSetup.PrintArea = ""
End Sub

Gruss Rainer

nach oben   nach unten

Re: Geht ganz einfach mit dem Makrorekorder..
von: Mario
Geschrieben am: 14.07.2002 - 21:17:37

Hallo Rainer,
habe soeben Dein Makro eingefügt.
Leider kommt immer wieder die gleiche Fehlermeldung:
Laufzeitfehler 1004
Die Methode ´PrintOut` für das Objekt Sheets ist fehlgeschlagen.

Weisst Du vielleicht weiter ?

Gruss Mario

nach oben   nach unten

Hast du einen Drucker installiert...
von: Ramses
Geschrieben am: 14.07.2002 - 22:25:16

Hallo,

das Makro funktioniert bei mir einwandfrei.
Tur mir leid. Mehr fällt mir leider nicht ein.

Gruss Rainer


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Drucken aus einem Dialog"