Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: DMDET am Juli 27, 2016, 22:18:40 Nachmittag

Titel: Office 2013: Im VBA die Netzwerkadresse Nr. (Ne Nr) ändern
Beitrag von: DMDET am Juli 27, 2016, 22:18:40 Nachmittag
Hallo,
bei mir ändert sich ab und zu die Ne Nr. vom Netzwerkdrucker! Kann ich die Nummer selber ändern ohne das die Datei an zu passen?

Danke im Voraus für die Eure Hilfe!
Titel: Antw:Office 2013: Im VBA die Netzwerkadresse Nr. (Ne Nr) ändern
Beitrag von: mumpel am Juli 28, 2016, 10:12:57 Vormittag
Hallo!

Nein. Das kann nur der Administrator. Ich nutze immer nur den Namen des Druckers, als z.B. "Samsung CP-250" anstatt "Samsung CP-250 an NE1".

Gruß, René
Titel: Antw:Office 2013: Im VBA die Netzwerkadresse Nr. (Ne Nr) ändern
Beitrag von: DMDET am August 01, 2016, 07:46:41 Vormittag
Hallo,
habe es probiert! Leider hat es nicht geklappt!

Mein ursprünglicher Befehl: Application.ActivePrinter = "HP M3035 - A4 auf Ne06:"

Mein abgewandter: Application.ActivePrinter = "HP M3035 - A4"

Habe ich was falsch gemacht?
Titel: Antw:Office 2013: Im VBA die Netzwerkadresse Nr. (Ne Nr) ändern
Beitrag von: maninweb am August 01, 2016, 09:39:56 Vormittag
Hallo,

auf meinem Blog findet sich hier http://www.excel-ticker.de/drucker-und-papierformate-in-vba-ermitteln-und-verwenden/ (http://www.excel-ticker.de/drucker-und-papierformate-in-vba-ermitteln-und-verwenden/) ein Beitrag von 2009,
wie Du die Druckerliste per Windows API ermitteln kannst. Allerdings ist der Code mit neueren Excel-Versionen ungetestet. Das Beispiel listet die
Drucker in einem Dialog auf und ermittelt die Papierformate. Theoretisch könntest Du den Code anpassen, indem Du die Liste der Drucker per
API ermittelst und dann nache Deinem Drucker suchst.

Hinweis: im Modul MLP_Maninweb findest Du einige API Deklarationen. Hier sollte Private Declare Function durch Private Declare PtrSafe Function
ersetzt werden, wenn Du Excel ab Excel 2010 verwendest.

Gruß