Office: Application.Dialogs.Item(xlDialogPrint).Show

Hallo liebes Forum,

ich rufe über ein Makro den Druckdialog auf

Application.Dialogs.Item(xlDialogPrint).Show
nun möchte ich, dass voreingestellt ist Markierung. Wleches Argument muss ich wie angeben?

Application.Dialogs.Item(xlDialogPrint).Show Argx:=?

Vielen Dank für eure Hilfe

:)

 

Hallo Marion,

MS Visual Basic-Hilfe unter "Dialogs (Auflistungsobjekt)"
"Listen der integrierten Dialogfeldargumente"

Markierung = arg12

Application.Dialogs(xlDialogPrint).Show arg12:=1

oder:

Sub dr_aufrufen()
Const kopien = 2
Const markierung = 1
Application.Dialogs(xlDialogPrint).Show arg4:=kopien, arg12:=markierung
End Sub


Gruss
patricio

 

Hallo Patricio,

vielen Dank

 

Ist zwar alt, aber...

Application.Dialogs(xlDialogPrint).Show arg12:=1

bei mir kommt da immer ne Fehlermeldung bzw. er nimmt es nicht mehr an? Was ist mein Fehler?:/

 

Hallo Excel-Fan's,

ich finde es schade, daß M$ die Hilfe zu diesem Problem so stiefmütterlich behandelt. Im Vba-Objektkalalog werden zu 'xlDialogPrint' 30 Argumente angegeben, ohne aber diese zu spezifizieren.
Auf der Seite https://msdn.microsoft.com/de-de/lib.../ff838781.aspx werden aber nur 15 Argumente aufgezählt.
Es ist doch einfach unmöglich, daß man mit Google oft weiterkommt als mit der mies gepflegten Office-Vba-Hilfe.

Gruß von Luschi
aus klein-Paris

 

Hallo Luschi,

die 30 Argumente im Objektkatalog beziehen sich ja allgemein auf die Show-Methode und sind optionale Parameter, sind also wohl je nach Verwendung einer Dialogfeld-Konstanten unterschiedlich, somit könnten n.m.V. die jeweils aufgeführten Parameter in der Hilfe die tatsächliche Zahl sein...

Ach ja, um dem Fragesteller auch noch zu antworten, bei mir funktioniert der Aufruf übrigens...*cool.gif*

Gruß, Muller2