Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst VBA Fehler 4608 im Word 2007 beim Druckerschacht wechseln

Mitglied: H41mSh1C0R

H41mSh1C0R (Level 3) - Jetzt verbinden

26.10.2010, aktualisiert 18:27 Uhr, 6791 Aufrufe, 1 Kommentar

Hi@All,

und mal wieder ein derbes kniffliges Problem wo ich so langsam am verzweifeln bin.

- Terminal Server Umgebung
- viele viele MA
- überall die gleichen Drucker (TA LP 4235) (umgelabelte Kyocera)
- überall die gleichen Treiber passend zum LP und keine KX Variante (universaltreiber von Kyocera) der auch bei den passenden Kopierern funktioniert.

So schön einfach wie man die Schächte setzen kann scheint das nicht immer zu wollen.

01.
        .FirstPageTray = 259        ' Kopfbogen -> Kassette 2 für das 1. Blatt 
02.
        .OtherPagesTray = 258       ' Weiss     -> Kassette 1 für alle Folgeseiten
Bei 99% der Dokumente die wir hier verarbeiten funktioniert das und reicht auch.

Aber bei 1% gibt es den Fehler:

01.
Fehler 4608 - Wert ausserhalb des Definitionsbereich
OK --> mal schaun was vorher und nachher für Werte gesetzt werden

01.
Sub Kopfbogen() 
02.
 
03.
  MsgBox ActiveDocument.PageSetup.FirstPageTray    --> Liefert Wert 2 
04.
  MsgBox ActiveDocument.PageSetup.OtherPagesTray  --> Liefert Wert 11 
05.
 
06.
  For i = 1 To ActiveDocument.Sections.Count 
07.
    With ActiveDocument.PageSetup 
08.
        .FirstPageTray = 259        ' Kopfbogen -> Kassette 2 für das 1. Blatt 
09.
        .OtherPagesTray = 258       ' Weiss     -> Kassette 1 für alle Folgeseiten 
10.
    End With 
11.
  Next i 
12.
 
13.
  MsgBox ActiveDocument.PageSetup.FirstPageTray   
14.
  MsgBox ActiveDocument.PageSetup.OtherPagesTray 
15.
 
16.
End Sub
Die Werte 2 und 11 sind vorher immer da.

Bei den Dokumenten wo er es korrekt setzt steht auch beim Ende das drinnen was ich mir wünsche also 259 für Kopfbogenschacht und 258 für den Schacht mit dem weissen Papier.


Selbst wenn ich

01.
   ActiveDocument.PageSetup.FirstPageTray = 259  
02.
   ActiveDocument.PageSetup.OtherPagesTray = 258
schreibe knallt es beim FirstPageTray.

Wo liegt da der Hase begraben? Ich dreh hier schon am Rad. =(

Wenn ich den Fehler abfange und "ignoriere" dann haut er alles so raus als ob die Schächte auf Automatisch stehen, d.h. er nimmt die erste Kassette und die hat immer weisses Papier. ^^

Ergo kommt dann keine 1. Seite auf Kopfbogen sondern alles auf Weiss.

Grüße


PS:

Die Schachtangaben sind Herstellerangaben und wurden mir bereits zig mal gestätigt bzw. habe ich auch selber ausgelesen aus den Dateien ich den Printstream in eine Datei umgeleitet habe.


PSPS:

Denke habe die Ursache gefunden was den Fehler auslöst, nur kann mir nicht erklären wie das zustanden kommen soll:

normal:

7b4a69a01385c4324209a3e73d3d04f2 - Klicke auf das Bild, um es zu vergrößern

kurz bevor die Schächte gesetzt werden sollen:

dbefe174a0ae49087720f5d2c7fbeb54 - Klicke auf das Bild, um es zu vergrößern

*knall*

Klar sind ja auch keine Trays mehr vorhanden auf die korrekt gewechselt werden kann.

Wenn der Ablauf durch ist sind im Word übrigens wieder die korrekten Trays vorhanden.

*am Kopf Kratz*
Mitglied: H41mSh1C0R
26.10.2010 um 18:14 Uhr
So ich habe nun herausgefunden wieso die Schächte weg sind. =)

Das liegt schlicht daran, weil ein anderer Drucker ausgewählt wurde.

Wir erzeugen über einen virtuellen Drucker Bilder des Dokumentes und danach erfolgt ein Druck auf den physischen Drucker.

Das hin und her wechseln an sich läuft wunderbar nur wenn ich mittendrin wo er bereits zurückgewechselt hat mir die Druckereigenschaften im Word anschau dann steht dort noch der virtuelle Drucker als Standarddrucker.

Wenn das Script nun versucht bei diesem Schacht 1 und 2 zu ändern, knallt es weil es diese Schächte nicht gibt, so mein erster Gedanke.

Lange Rede kurzer Sinn:

Script angepasst und nach dem Wechseln nochmal explizit den Standarddrucker gesetzt auf dem er ja gerade steht.

Voala und schon steht auch der korrekte Drucker im Word.

Problem:

Es knallt immernoch. *Tierisch am Kopf kratz*
Bitte warten ..
Ähnliche Inhalte
Windows Server
Druckerschächte TerminalServer
Frage von Tyga911Windows Server9 Kommentare

Hallo zusammen, Wir haben einen Windows Server 2012 r2 im einsatz. Hier haben wir 4 Terminalserver auf denen die ...

Microsoft Office
VBA Word IBAN zerschneiden
gelöst Frage von InSpeeMicrosoft Office8 Kommentare

Hallo, wie kann ich mit VBA eine IBAN in 4er Schritten zerschneiden, sodass die IBAN so aussieht: DExx xxxx ...

Microsoft Office

Word 2007: "Bei der Weitergabe des Befehls an das Programm ist ein Fehler aufgetreten"

gelöst Frage von luklukMicrosoft Office13 Kommentare

Hallo zusammen, ich habe seit ca 2-3 Wochen vermehrt Probleme mit Word. Dies betrifft jetzt schon ca. 5 Rechner, ...

VB for Applications

Excel-VBA nach Word-VBA übersetzen (V. 2010)

gelöst Frage von spinnifexVB for Applications2 Kommentare

Hallo Admins, wie kann ich folgendes XL-Makro nach Word übersetzen, wobei die Zelladresse "A1" als Textmarke "Anzahl" angesprochen werden ...

Neue Wissensbeiträge
Erkennung und -Abwehr

Ups: Einfaches Nullzeichen hebelte den Anti-Malware-Schutzt in Windows 10 aus

Information von kgborn vor 11 StundenErkennung und -Abwehr

Windows 10 ist das sicherste Windows aller Zeiten, wie Microsoft betont. Insidern ist aber klar, das es da Lücken, ...

Windows 10

Windows 10 on ARM: von Microsoft entfernte Info - Klartext, was nicht geht

Information von kgborn vor 13 StundenWindows 10

Windows 10 on ARM ist ja eine neue Variante, die Microsoft im Verbund mit Geräteherstellern am Markt etablieren will. ...

Microsoft
TV-Tipp: Das Microsoft-Dilemma
Information von kgborn vor 13 StundenMicrosoft8 Kommentare

Aktuell gibt es in Behörden und in Firmen eine fatale Abhängigkeit von Microsoft und dessen Produkten. Planlos agieren die ...

Windows 10
Zero-Day-Lücke in Microsoft Edge
Information von kgborn vor 2 TagenWindows 10

In Microsofts Edge-Browser klafft wohl eine nicht geschlossene (0-Day) Sicherheitslücke im Just In Time Compiler (JIT Compiler) für Javascript. ...

Heiß diskutierte Inhalte
Windows 10
Windows 10 (1709) Tastur und Maus wieder einschalten?
Frage von LochkartenstanzerWindows 1026 Kommentare

Moin, Ich habe von einem Kunden einen Win10-Rechner bekommen, bei dem weder Tastatur noch Maus geht. Die Hardware funktioniert ...

Firewall
RB2011 Firewall Rule eine bestimmte Mac oder IP Adresse nicht zu blockieren
Frage von lightmanFirewall15 Kommentare

Hallo liebes Forum mit ihren Spezialisten. Ich habe meine Firewall so konfiguriert das kein Endgerät ohne meine Speziellen Erlaubnis ...

Humor (lol)
Was könnte man mit einem Server machen? Idee gesucht
Frage von 2SeitenHumor (lol)15 Kommentare

Hey Zusammen Ich habe einen alten HP G2 Rackserver zu Hause rumliegen. 28GB Ram, 1xAMD Prozi mit etwa 2GHz. ...

Webbrowser
Welcher Browser ist der Beste?
Frage von justtinWebbrowser13 Kommentare

Hallo Leute Ich habe eine interessante Frage. Mich wurde mal interessieren welcher Browser ist eure meinung nach der beste? ...