---

Wie kann ich in einem Macro einen anderen Drucker als den Standarddrucker verwenden ?
Komme immer bis zur Msgbox, und dann ist Funkstille !
Möchte hier von Standarddrucker auf einen TIFF Drucker umschalten.
Drucker ist vorhanden und wird auch gefunden, aber nach dem Befehl CATIA.ActivePrinter  ist mein MAcro einfach beendet.

For k = 1 To CATIA.Printers.Count
Msgbox "Plotterauswahl: " & CATIA.Printers.Item(k).DeviceName
If CATIA.Printers.Item(k).DeviceName = "Tiff" Then
    Set ActivePrinter =  CATIA.Printers.Item(k)
    Msgbox "TEST"
    CATIA.ActivePrinter = ActivePrinter
End If
Next

Danke für jede Hilfe
alias

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo alias,

ich habe Dir mal ein paar Zeilen Code aus meinem BatchPlot-Programm gezogen:

Private Sub SwitchPrinter(plotter As String)
    For j = 1 To SystemPrinters.Count
        Select Case SystemPrinters.Item(j).DeviceName
            Case plotter:
                CATIA.ActivePrinter = SystemPrinters.Item(j)
'Printer gefunden und eingestellt
                Exit Sub
        End Select
    Next
CATIA.ActivePrinter = SystemPrinter
'Printer nicht gefunden, zurück zum Standarddrucker
End Sub

------------------
Stephan

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallöchen Zusammen,

OK das funzt ja soweit.

ABER!!!

ich möchte nicht den DeviceName verwenden (bei uns: \\dewwvsprint04\DEWSHCAD003) sondern ich möchte den Modell-Namen sehen (mein Wunsch: Canon iR-ADV C5030/5035 PCL5c)

was muss ich hinter ....Item(i). schreiben?

Hokay

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Hokay,

da scheint es nix besseres zu geben.
Bei uns steht in DeviceName auch schon alles richtig drin.

bei Name könnte noch etwas drinstehen, aber das ist bei uns der Pfad.

Du wirst wohl auf Windows-Funktionen zurückgreifen müssen, wenn Du etwas anderes möchtest.

Unter http://www.cpearson.com/excel/GetPrinters.aspx gibt es einen interessanten Ansatz über die Registry. Ich würde aber eine Windows-DLL mit direktem Zugriff bevorzugen. Die wird sicher aber noch komplexer einzubinden sein.

------------------
Mit freundlichen Grüßen,
Henry Schneider
alias Lila

Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren:
Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen,
die Natur versucht, immer bessere Idioten zu bauen

Xing

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP