Office: Drucken-Schaltfläche

....das Rote deutet darauf hin, dass da beim reinkopieren wahrscheinlich irgendwelche ungültigen Sonderzeichen mit eingefügt wurden. Wie die da reinkommen, kann ich Dir allerdings auch nicht sagen. Ich würde vorn und hinten mal alle nicht sichtbaren Zeichen entfernen. Ansonsten müsstest Du mal die Datei hochladen.

ItemSizeHeight etc. wirst Du hier auch nicht finden. Das ist eine Eigenschaft des Printer Objekts von Word. Hier arbeitest Du aber mit Systemeigenen Laufzeitbibliotheken, die ganz andere Parameter und Parameternamen verwenden. Schau Dir mal den Type DevMod an. Da lauten die entsprechenden Namen dmPaperLength und dmPaperWidth

 

Ich habe das rot markierte nochmal geprüft und sehe keinen Fehler. Der Text ist genau der gleiche wie in der Vorgabe von dir.

Danke für den Hinweis *top

Deinen Vorschlag nehme ich gerne an und lade die Datei hoch. Ich weiß echt nicht mehr weiter, weil der Code mein Wissen schon weit übersteigt. *sos
Musste es per Upload-Dienst machen, weil die Datei für den Anhang hier leider schon zu groß ist. http://www.uploadagent.de/show-207905-1481798153.html

 

...den kompletten geposteten Code raus aus dem Modul der Form, rein in ein eigenständiges Modul.

In Private Sub btn_drucken_Click() auch den kompletten Code raus. Rein gehört nur: Code:

 

Hat ein bisschen gedauert bis ich alles anpassen konnte. Das Rote ist jetzt weg und der Code läuft auch durch *top
http://www.uploadagent.de/show-207937-1481900994.html

Ich bekomme allerdings noch zwei Fehlermeldungen im Modul 2 bei
Code:

Einmal kommt die Meldung vor und ein zweites Mal nach dem Drucken.
Was will mir die Prozedur da sagen? Kann ich diese Passagen getrost rauslöschen? Er macht ja was ich will, drucken.

Wo lege ich fest, dass er mir das Blatt von der erstellten pdf im Querformat ausdruckt? Momentan kommt es noch im Hochformat raus.

 

Jetzt sehe ich es. In der Zeile
Code:

in der UserForm steht die "2" für Querformat. Das erzeugte pdf-Dokument wird dann leider trotzdem im Hochformat ausgedruckt. Liegt das anscheinend daran, dass Adobe standardmäßig auf "automatisch" eingestellt ist was das Format betrifft? Dort scheint er es sich dann selber rauszusuchen und druckt im Hochformat?

 

...wie es scheint, muss ich Dich letzten Endes doch wieder auf diesen Link verweisen. Offenbar scheinen sich die Einstellungen des Druckers nicht so leicht über Excel - VBA ändern zu lassen. Deshalb würde ich Dir empfehlen, Erstelle Deinen Drucker ein 2. Mal (mit geänderten, angepassten Einstellungen) und ändere in VBA nur den Drucker (wie im Link gezeigt).