|
Guten Morgen!
Ich habe schon so einige Versuche hinter mir, aber irgendwie finde ich kein Ergebnis.
Ich habe in der Personal.xlsb ein Tabellenblatt, welches sich "Drucker" nennt.
Die Druckernamen stehen in Spalte B, in Spalte C steht der Name der Zelle, in der sich der Druckername befindet:
| Druckerindex |
Name |
Zelle |
| 1 |
M1A4DNTNHFLA auf Ne07: |
B2 |
| 2 |
M2A4DATAHFLA auf Ne04: |
B3 |
| 3 |
M3A4DATAA4LA auf Ne03: |
B4 |
Der Pfad zu den Druckern beginnt mit "C:\\192.168.2.250\(hier kommt dann der Druckername)"
Nun möchte ich gerne aus einer beliebigen Datei ein Makro aufrufen, beispielsweise
Call DruckB2
oder
Call DruckB4
Dann soll auf dem Drucker, der sich in Zelle "B2" oder eben in Zelle "B4" in der Personal.xlsb Datei befindet, gedruckt werden.
Zusätzlich möchte ich die Anzahl der Kopien aus der beliebigen Arbeitsmappe bestimmen können, Anzahl der Kopien beispielsweise aus Zelle A1 auslesen, wenn da nichts stht, dann einen Ausdruck anfertigen.
Das hatte ich mir so vorgestellt:
' Hole die Anzahl der Kopien aus der angegebenen Zelle
On Error Resume Next
Kopien = ActiveSheet.Range(KopienZelle).Value
If Kopien <= 0 Then Kopien = 1 ' Standardwert setzen, falls leer oder ungültig
On Error GoTo 0
Weiß jemand von Euch, wie ich das umsetzen kann?
Oder habe ich irgend wor einen Gedankenfehler?
LG
Matthias
|