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

Drucken aus 2 verschiedenen Kassetten

Frage Microsoft Microsoft Office

Mitglied: Tesi73

Tesi73 (Level 1) - Jetzt verbinden

04.07.2011, aktualisiert 11:59 Uhr, 12424 Aufrufe, 11 Kommentare

Hallo zusammen,
ich habe ein kleines Problem mit einem Drucker. Ich möchte gerne das er mir ein Worddokument in 2 Ausführungen ausdruckt. Dafür habe ich ein Macro aufgezeichnet.

Das soll folgendes aussagen:
drucke mir 1x Blanko aus Kassette 1
drucke mir 2x Briefbögen aus Kassette 3

lege Dokumente in Mailboxfach 4 ab.

Mein problem ist zz das er zwarst 3 Ausdrucke macht, leider nicht aus den einelnd angegebenen Kassetten sondern immer aus Kassette 1.

Was muss ich tun, bzw wie muss ich meine Anweisung verfeinern um das gewünschte Ergebnis zu erhalten?
Kennt sich da jemand aus?
Danke im Voraus!
Gruß Tesi73

Office 2003 SP3
Win XP SP3
Drucker Kyocera KM-5050 KX

Sub Druck_Zentral1()
'
' Druck_Zentral1 Makro
' Makro aufgezeichnet am 04.07.2011 von Tesi73
'
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=2, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
End Sub
Mitglied: holli.zimmi
04.07.2011 um 12:26 Uhr
HI,

hast Du deine Kassetten dementsprechend eingestellt?

Gruss

Holli
Bitte warten ..
Mitglied: Tesi73
04.07.2011 um 12:42 Uhr
hi,

die kassetten sind im Drucker eingestellt mit Blanko und Vordrucke und den Kassetten zugewiesen.
Bitte warten ..
Mitglied: ackerdiesel
04.07.2011 um 13:12 Uhr
Zitat von Tesi73:
die kassetten sind im Drucker eingestellt mit Blanko und Vordrucke und den Kassetten zugewiesen.

und ich glaube hier liegt das Problem: Wenn im Word Normalpapier eingestellt ist, ignoriert der Drucker die Kassette und nimmt das Papier aus der Kassette die Du mit Normal deklariert hast. Du musst beide Kassetten auf Normalpapier setzen und dann sollte dein Makro funktionieren.

Gruß
ackerdiesel
Bitte warten ..
Mitglied: Tesi73
04.07.2011 um 13:21 Uhr
und ich glaube hier liegt das Problem: Wenn im Word Normalpapier eingestellt ist, ignoriert der Drucker die Kassette und nimmt das
Papier aus der Kassette die Du mit Normal deklariert hast. Du musst beide Kassetten auf Normalpapier setzen und dann sollte dein
Makro funktionieren

Das würde ich ja gerne nur dann spinnen alle anderen Programme rum die mit den Kassetten und diesen (Blanko)(Vordrucke) usw arbeiten.
Viele drucke bei uns kommen aus Programmen die diese Einstellungen schon drin haben. Wenn ich die Einstellungen jetzt verändere, laufen die Programmausdrucke nicht mehr.
Bitte warten ..
Mitglied: ackerdiesel
04.07.2011 um 15:57 Uhr
dann musst Du in deinem Makro nicht die Kassette ändern, sondern den Papiertyp und dann gehts.
Bitte warten ..
Mitglied: Tesi73
04.07.2011 um 17:42 Uhr
könntest du mir die Textstellen zeigen wo ich den Papiertyp einstelle? Ich kann keine unterschiede erkennen und seh auch weder Papierauswahl noch Kasettenfächer.
Danke
Bitte warten ..
Mitglied: ackerdiesel
05.07.2011 um 07:56 Uhr
Makro aufzeichnen:
<drucke mir 1x Blanko aus Kassette 1>

Datei / Drucken / Drucker auswählen / Eigenschaften / Papiertyp Normal / Ok / Drucken

<drucke mir 2x Briefbögen aus Kassette 3>

Datei / Drucken / Drucker auswählen / Eigenschaften / Papiertyp Briefkopf / Kopien2 / Ok / Drucken

und den Drucker einstellen auf:
Kassette1 = Normalpapier/DinA4
Kassette2 = Briefkopf/DinA4


Gruß
ackerdiesel
Bitte warten ..
Mitglied: Tesi73
05.07.2011 um 09:28 Uhr
Guten Morgen @ll,
ich habe mal das Macro so wie Ackerdiesel gesagt aufgezeichnet. Ich kann in den beiden Aufzeichnungen nicht sehen ob und was Blanco und was Briebkopf beinhaltet. Die sehen für mich föllig Identisch aus, bis auf die Anzahl der Kopien. Und so sehen die anderen 10 versuche bei mir auch aus. Sofern ich das Macro dann im Anschluss starte, druckt er mir alle auf Blanco aus. Denke weil sich der Drucker nach jedem Druck auf Standard zurückstellt. Ich werde noch irre hier

Sub Makro2()
'
' Makro2 Makro
' Makro aufgezeichnet am 05.07.2011 von Tesi73
'
ActivePrinter = "\\srv2003\HH Zentraldrucker"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=True, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
End Sub

Sub Makro3()
' Makro3 Makro
' Makro aufgezeichnet am 05.07.2011 von Tesi73
'
ActivePrinter = "\\srv2003\HH Zentraldrucker"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=2, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=True, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
End Sub
Bitte warten ..
Mitglied: ackerdiesel
05.07.2011 um 09:59 Uhr
Was für einen Drucker hast Du denn ? Hast Du die Kassetten richtig eingestellt, wie ich es geschrieben habe (und den Drucker einstellen auf Kassette1 = Normalpapier/DinA4Kassette2 = Briefkopf/DinA4) ? Geht das Drucken richtig/problemlos manuell, d.h. ohne Makro ?
Bitte warten ..
Mitglied: Tesi73
05.07.2011 um 10:15 Uhr
habe einen Kyocera KM-5050 KX (Standgerät MFP) DIe Kassentten haben ihre Bezeichnung im Drucker. Kassette 1 (Blanko-A4); Kasette 2 (Vordruck-A5); Kassette 3 (Briefpapier-A4); Kassette 5 (Großpapier A3); Universalkassette (Benutzerdefiniert)
Wenn ich den Drucker manuell drucken lasse, geht alles wie gewünscht. Auch wenn ich das Makro aufzeichne ist es perfekt. Nur wenn ich es Debugge (F8) macht er nicht das was ich will. Dann bekomme ich 3 mal Blanko ausgedrückt. Kann es sein das es was mit der WTS umgebung zu tun hat?
Gruß Tesi
Bitte warten ..
Mitglied: Tesi73
13.07.2011 um 11:17 Uhr
So da ich das Problem leider nicht mit einem Makro beheben konnte, wurde ein neuer Druckertreiber für das Gerät eingespielt und auf meine Voraussetzungen bzw meine Anforderungen angepasst. Ich habe also jetzt einen Drucker im Netzwerk der 1 Seite Blanko un 2 Seiten auf Briefpapier druckt. Ich hätte es viel lieber mit einem Makro geschafft, denn ich habe noch so einen Drucker, der auf Zuruf (zB Strg.+1) nur aus Kassette 1 Blanco drucken soll. Vielleicht kann mir jemand sagen was an den Aufzeichungen meines Makro nicht stimmt. Damit ich was ändern kann bzw einen Anfangspunkt habe. Mir selber scheint das die Makros gleich sind und das keine Kassetten angegeben sind und auch keine Ausgabepunkte. Irgendwie komisch.

Sub Makro()
'
' Makro Makro
' Makro aufgezeichnet am 13.07.2011
'
ActivePrinter = "\\srv2003\Vertrieb Zentral"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
End Sub
Sub Makro1()
'
' Makro1 Makro
' Makro aufgezeichnet am 13.07.2011
'
ActivePrinter = "\\srv2003\Vertrieb Zentral"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
End Sub
Sub Makro2()
'
' Makro2 Makro
' Makro aufgezeichnet am 13.07.2011
'
ActivePrinter = "\\srv2003\Vertrieb Zentral"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
End Sub
Sub Makro3()
'
' Makro3 Makro
' Makro aufgezeichnet am 13.07.2011
'
ActivePrinter = "\\srv2003\Vertrieb Zentral"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
Application.WindowState = wdWindowStateMinimize
End Sub
Bitte warten ..
Ähnliche Inhalte
Windows 7
Drucker in 2 verschiedene Subnetzen.
Frage von s-n-e-jWindows 728 Kommentare

Hallo, mich beschäftigt folgendes Problem. In meinem Netzwerk befinden sich 4 PC's, jeweils 2 davon im gleichen Subnetz. Das ...

Windows 10
Sharp MX-C312 2.Kassette
gelöst Frage von onlymeWindows 102 Kommentare

Hallo zusammen, ich habe einen Windows 10 64 bit pro Rechner. Von diesem steuere ich den oben genannten Drucker ...

LAN, WAN, Wireless
MF Drucker aus 2 verschiedenen Netzwerken ansprechen
gelöst Frage von MacDuffyLAN, WAN, Wireless4 Kommentare

Hallo an alle, ich habe seit einigen Tagen ein Problem bezüglich eines MF Druckers in einem anderen Netzwerk Natürlich ...

Batch & Shell
Powershell PDF drucken auf verschiedene Drucker
gelöst Frage von ChrissssiBatch & Shell2 Kommentare

Hallo zusammen, Mein Problem ist das ich PDF Dateien habe die ich auf unterschiedliche Drucker automatisch drucken muss. Das ...

Neue Wissensbeiträge
Internet

Was nützt HTTPS, wenn es auch von Phishing Web-Seiten genutzt wird

Information von Penny.Cilin vor 2 TagenInternet17 Kommentare

HTTPS richtig einschätzen Ob man eine Webseite via HTTPS aufruft, zeigt ein Schloss neben der Adresse im Webbrowser an. ...

Webbrowser

Bugfix für Firefox Quantum released - Installation erfolgt teilweise nicht automatisch!

Erfahrungsbericht von Volchy vor 3 TagenWebbrowser7 Kommentare

Hallo zusammen, gem. dem Artike von heise online wurde mit VersionFirefox 57.0.1 sicherheitsrelevante Bugs behoben. Entgegen der aktuellen Veröffentlichung ...

Sicherheit

Teamviewer Sessions können gekapert werden - Update tw. verfügbar

Information von sabines vor 3 TagenSicherheit6 Kommentare

In bestimmten Konstellationen können Teamviewer Sessions gekapert werden, wahrscheinlich aber ein recht unwahrscheinliches Szenario. Da der Teamviewer gerne für ...

Digitiales Fernsehen

Apple TV: Amazon Prime App ist verfügbar

Information von Frank vor 4 TagenDigitiales Fernsehen4 Kommentare

Die Amazon Prime Video App kann ab sofort auf einem Apple TV ab der 3 Generation installiert werden. Einfach ...

Heiß diskutierte Inhalte
Vmware
Installation Windows 10 VMware
Frage von Ghost108Vmware17 Kommentare

Hallo zusammen, versuche gerade mit Hilfe des vshpere clients eine virtuelle Windows 10 maschine aufzusetzen. 1. virtuelle Maschine erstellt ...

Exchange Server
SBS 2011 E-Mails können gesendet werden, aber nicht von extern empfangen
Frage von andreas1234Exchange Server14 Kommentare

Hallo Community, ich habe das Problem, dass seit knapp zwei Wochen die E-Mails von meinem SBS 2011 einwandfrei gesendet ...

Voice over IP
Telefonstörung - Ortsrufnummern kein Verbindungsaufbau
Frage von Windows10GegnerVoice over IP10 Kommentare

Hallo, sowohl bei uns als auch beim Opa ist es über VoIP nicht möglich Ortsrufnummern anzurufen. Es kommt nach ...

Windows Server
Server 2012 über Eingabeaufforderung devmgmt.msc geht nicht
gelöst Frage von achim222Windows Server9 Kommentare

Hallo, ich habe hier einen Server 2012 der im Reparaturmodus startet. Es liegt an einem falschen VirtIO Treiber für ...