Wie sehe ich ob Druckvorschau abgebrochen

Forumthread: Wie sehe ich ob Druckvorschau abgebrochen
4 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Wie sehe ich ob Druckvorschau abgebrochen

14.12.2006 00:21:11

Peter

Hallo
Ich programmierte eine Druckvorschau :
ActiveWindow.SelectedSheets.PrintPreview
Wie kann ich sehen, ob diese Druckvorschau abgebrochen wurde, oder ob gedruckt worden ist ?
Ich bitte um eine baldige Antwort - Peter

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Wie sehe ich ob Druckvorschau abgebrochen

14.12.2006 08:23:36

Uwe
AW: Wie sehe ich ob Druckvorschau abgebrochen

15.12.2006 02:29:04

Peter
AW: Wie sehe ich ob Druckvorschau abgebrochen

15.12.2006 02:45:09

Uwe
Vielen Dank - war noch am ausprobieren !

15.12.2006 05:10:09

Peter

AW: Wie sehe ich ob Druckvorschau abgebrochen

14.12.2006 08:23:36

Uwe

Hallo Peter,
so gehts:

MsgBox Application.Dialogs(xlDialogPrintPreview).Show

Gruß Uwe

AW: Wie sehe ich ob Druckvorschau abgebrochen

15.12.2006 02:29:04

Peter

Hallo
ja.. mit 'MsgBox Application.Dialogs(xlDialogPrint).Show'
wird mir 'Wahr' oder 'Falsch' angezeigt.
Nun wie kann ich das VBA mässig verwerten ?
Weil es geht nicht : if Application.Dialogs(xlDialogPrint).Show = true then ...
Wie mache ich das ?
Bis bald - Peter

AW: Wie sehe ich ob Druckvorschau abgebrochen

15.12.2006 02:45:09

Uwe

Hallo Peter,
vielleicht reden wir ja aneinander vorbei oder Deine Brille ist schon zu alt. ;-)
Bei mir war nie die Rede von "Application.Dialogs(xlDialogPrint).Show"!
Also noch einmal:

Sub X()
If Application.Dialogs(xlDialogPrintPreview).Show = True Then
MsgBox "Es wurde was gedruckt."
Else
MsgBox "Druck wurde abgebrochen."
End If
End Sub

Gruß Uwe

Vielen Dank - war noch am ausprobieren !

15.12.2006 05:10:09

Peter

Hallo Uwe
Ja stimmt, ich war halt beim 'ausprobieren' bei xlDialogPrint 'gelandet'.
Ich bin erstaunt das ich es nicht selber hinbekommen habe, ich hatte einen ähnlichen Lösungsansatz versucht.
Dein Lösungsansatz funktioniert perfekt.
Danke nochmals - Gute Nacht - Peter.