Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
188to192
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
188to192
188to192
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Netzwerkdrucker

Netzwerkdrucker
07.12.2002 10:52:21
Nico D
Hallo Zusammen,

ich habe ein Problem mit folgendem Beispiel.

Beispiel:
Application.Dialogs(xlDialogPrinterSetup).Show
ActiveSheet.PrintOut

Das Dialogfeld ermöglicht mir die Optionen nach der Druckerauswahl
1. zu bestätigen
oder
2. den Vorgang zu beenden.

Mein Problem hierbei ist, daß selbst wenn ich betätige Folgefunktionen durchgeführt werden (mir fehlt also die Exit Sub Anweisung für den Button .

Wie kann ich den Folgevorgang abbrechen bzw. wie ist dieser Button definiert (z.B. vbCancel), um eventuell eine If - Schleife zu verwenden.

Grüße
Nico


2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Netzwerkdrucker
07.12.2002 12:48:29
Hajo_Zi
Hallo Nico

versuchs so


Option Explicit

Sub Nico()
Dim Wert As Boolean
Wert = Application.Dialogs(xlDialogPrinterSetup).Show
If Wert = False Then Exit Sub
ActiveSheet.PrintOut
End Sub

Code eingefügt mit: Excel Code Jeanie

Gruß hajo

Anzeige
Spitze es klappt ! DAnke
07.12.2002 13:56:37
Nico D
super. Danke es klappt!

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige