Tabellenkalkulation

Fenster "Drucken" per VBA öffnen

Diskussionsgruppen
Betriebsysteme: Windows 7; WindowsVista; WindowsXP; Linux; BS-Sonstige
Software: Textverarbeitung; Tabellenkalkulation; Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; E-Mail/Outlook; Internet Browser; SW-Sonstige
Hardware: Mainboard/CPU/RAM; Grafikkarten; Peripherie; HW Sonstiges
Netzwerk: DSL; W-Lan; Telekommunikation; NW-Sonstiges
Programmierung: Skripte(PHP,ASP,Perl...); Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke

Hallo zusammen! Wie kann ich mit Hilfe von VBA das Fenster "Drucken" öffnen? Gruß Johannes

Hallo Johannes,
das geht z.B. so:

If Application.Dialogs(xlDialogPrinterSetup).Show = True Then
    MsgBox "Ausdruck wird gestartet"
Else
    MsgBox "Abbruch gewählt"
End If

Gruss Rolf

sorry.Der Code startet nur die Printerauswahl.
Also so:

Zitat:
If Application.Dialogs(xlDialogPrint).Show = True Then
MsgBox "Ausdruck wird gestartet"
Else
MsgBox "Abbruch gewählt"
End If

Gruss Rolf

Ich bräuchte aber das Fenster, dass erscheint wenn ich über -> Datei -> Drucken geh.

Gruß
Johannes

Danke hab deinen Eintrag zu spät gelesen. Jetzt passts.

Gruß
Johannes