Microsoft Print to PDF auf NE0x wechselt
28.07.2021 13:07:11
Sabbel
ich nutze den Microsoft Print to PDF um PDFs zu erstellen.
Leider ändert sich seit einiger Zeit die Zahl hinter NE. Da mehrere Rechner die Datei nutzen muss man fast täglich schauen wie der Drucker jetzt heist.
Mal ist es NE01 und dann auf einmal NE04
Hat jemand eine Idee wie man das umgehen kann.
Bislang hatte ich ich es über die Abfrage der iPAdresse gemacht, aber wie gesagt seit kurzen ändert sich das auf jedem Rechner.
With wksRechnungDruck
If iP_Adresse = "192.168.178.23" Then
.Application.ActivePrinter = "Microsoft Print to PDF auf NE02:"
Else
.Application.ActivePrinter = "Microsoft Print to PDF auf NE05:"
End If
.ExportAsFixedFormat Type:=xlTypePDF, From:=1, To:=1, _
Filename:=PDF_Speicher, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End With
Anzeige