Office: (Office 2016) Drucken mit IP Adresse

Hallo,
ich habe seit ein paar Tagen meine Drucker im Netzwerk. Diese kann ich auch per VBA ansteuern und er druckt auch.
Jedoch immer nur auf einem Drucker, egal welchen Drucker ich wähle.

Application.Printer = Application.Printers("\fileserverZDesigner GK420d (DR009)")
DoCmd.PrintOut

Gedruckt wird statt auf ZDesigner GK420d (DR009) auf ZDesigner GK420d (DR003).
Ich finde einfach keine Lösung.
Meine Idee: Statt dem Druckernamen die jeweilige IP-Adresse zu nehmen, aber wie mache ich das?
Schön, wenn mir jemand helfen könnte
Gruß Peter

:)

 

Sieh Dir mal in DBWiki die Lösung 3 an.

 

Danke Maxel,
genauso habe ich es gemacht.

 

Erscheint dieser Drucker in der Printers-Auflistung?

 

Ja, der DR003 und auch der DR009

 

Naja, "genauso" kann ich anhand Deines einzeiligen Codes im Vergleich mit meinem Link nicht erkennen.

 

in meinem 1. Beitrag wurden Zeichen verschluckt, daher der Code auf dem Bild. Kannst du mir dabei helfen, den Code mit IP-Adresse hinzubekommen?

 

Hallo,
du kannst mit folgendem Code mal alle installierten Drucker durchtesten: Code:

 

Danke Steffen0815,
Alle Drucker werden in der Meldung nacheinander richtig angezeigt und der Bericht wird auch an dem richtigen Drucker gedruckt.
Die Bezeichnung der Drucker ist auch so, wie ich es angegeben habe.

 

Hallo,
na dann ist doch alles perfekt *wink.gif*

 

*bawling aber mein Code funktioniert nicht - nur deiner.
was ist an meinem Code falsch, warum kann ich nicht einen bestimmten Drucker ansprechen?

 

Hallo,
weil du deine 2 (3) Zeilen Code durch diese 4(5) Zeilen ersetzen musst.

Code:

... Ja und wenn es dann immer noch nicht geht, dann wirds lustig *wink.gif*

 

erst einmal vielen Dank - ich werde das testen und melde mich dann wieder.
... ausnahmsweise hoffen wir mal, dass es nicht lustig wird*wink.gif*

 

Ich danke dir, es funktioniert, jetzt ist die Welt wieder schön*biggrin.gif*