Hallo Leute,
ich habe ein Problem mit einem Makro.
Dieses soll ein verstecktes Tabellenblatt 2x auf dem Netzwerkdrucker "xyz123" ausdrucken. Es funktioniert alles wunderbar von meinem PC aus. Von allen anderen PCs im Netzwerk geht es nicht, da der angesteuerter Drucker auf jedem Rechner eine andere Zuweisung hat, also:
Application.ActivePrinter = "\\XY1234\AB987 auf Ne03:" oder ... auf Ne05:" oder ... auf Ne02:" usw., usw.
Sheets("Lieferschein").Visible = True
Sheets("Lieferschein").PrintOut Copies:=2
Sheets("Lieferschein").Visible = False
Ich bräuchte somit erst ein Makro welches herausfindet, wie die Adresse des Druckers \\XY1234\AB987 auf dem gerade verwendeten PC lautet und diese Adresse dann entsprechend verwendet.
Gibt es da Hoffnung für mich???
Vielen Dank schon jetzt!
Gruß
MARTIN