Drucken über Word mit Druckdialog

[Puthy]

Hi,

ich versuche ein Word-Dokument über Notes zu druke. Soweit - eigentlich ganz easy. Aber wie kann ich die DialogBox zum drucken (Auswahl von Drucker etc) aus Notes heraus öffnen?

Derzeit handhabe ich (versuche) wie folgt:

Code

Set app = CreateObject("Word.Application")
	Set objWordDocument = app.Documents.Add(strPath)
	Set worddoc = app.activedocument
	app.Visible = True		
	call app.Dialogs(wdDialogFilePrint).Show

Das kann doch eigentlich nicht so schwer sein.

[Demian]

Moin Puthy,

das liegt an dem wddialogfileprint. Das ist eine Wordspezifische Konstante, die Notes natürlich nicht kennt.

Laut Objektkatalog in Word hat sie den Wert 88. Probiers mal mit app.dialogs(88).show.

Gruß
Demian

[Puthy]

Verdammt Danke das funktioniert einwandfrei.