Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Makro für druck über verschiedene Papiereinzüge

Frage Microsoft Microsoft Office

Mitglied: ErzP

ErzP (Level 1) - Jetzt verbinden

03.04.2006, aktualisiert 03.08.2006, 8036 Aufrufe, 3 Kommentare

Ich würde gerne für mehrer abteilungen in meiner Firma in der Symbolleiste in Excel Buttons erstellen mit denen Makros ausgefürt werden. Ich habe bereitz ein Makro für Word mit denen man mit einem klick auf verschiedenen Druckern im Netzwerk getruckt werden kann und je nach Makro entweder Papierschacht 1 oder 2 genutz werden (Papierschacht 1: Normales Papier, Schcht 2: Logo der Firma usw.). Wenn ich diese Makros in aber in Excel (2002 bis 97) einfüge bekomme ich von Virtual Basic die Meldung "Laufzeitfehler '424' Objekt erforderlich". Meine Makros sehen so aus:

Sub papiermitlogo()
'


With ActiveDocument.PageSetup
.Orientation = wdOrientPortrait
.FirstPageTray = wdPrinterLowerBin
.OtherPagesTray = wdPrinterLowerBin
End With
ActivePrinter = "\\a321de11\PDE321-000051"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False
With ActiveDocument.PageSetup
.FirstPageTray = wdPrinterDefaultBin
.OtherPagesTray = wdPrinterDefaultBin
End With
End Sub

Sub normalpapier()


With ActiveDocument.PageSetup
.LineNumbering.Active = False
.Orientation = wdOrientPortrait
.FirstPageTray = wdPrinterLargeCapacityBin
.OtherPagesTray = wdPrinterLargeCapacityBin
End With
ActivePrinter = "\\a321de11\PDE321-000051"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False
With ActiveDocument.PageSetup
.LineNumbering.Active = False
.Orientation = wdOrientPortrait
.FirstPageTray = wdPrinterDefaultBin
.OtherPagesTray = wdPrinterDefaultBin
End With
End Sub


Ein ehemaliger Kollege hat dieses Makro erstellt, ich selber kenne mich mit Virtual Basic nicht aus...
Währe nett wenn mir jemand helfen könnte.

Ich danke im voraus für eure Antworten!
Mitglied: Nebuchadneza
04.04.2006 um 09:10 Uhr
geht es nur um die schachtansteuerung ????

was nutzt ihr für drucker ? bei kyocera kann man das alles z.b. über prescribe händeln, dürfte einfacher sein

MfG

B.Böcherer
Bitte warten ..
Mitglied: ErzP
04.04.2006 um 14:10 Uhr
Es geht nur darum mit einem Makro von Schacht 1 und mit dem anderen Makro von Schacht 2 drucken zu lassen. 3 Drucker alle von HP, davon 2 InkJet 1200(glaub ich) und ein LaserJet. Alles Netzwerkdrucker.

Ich bin für jede Überlegung dankbar!

Philipp Erz
Bitte warten ..
Mitglied: Hatl
03.08.2006 um 15:28 Uhr
Fals das Problem noch aktuell ist hilft villeicht das:
VBA Papierschacht mit Makro
Bitte warten ..
Ähnliche Inhalte
Windows Netzwerk
gelöst Alle Drucker in verschiedenen Netzen Abfragen (4)

Frage von ChrisIO zum Thema Windows Netzwerk ...

VB for Applications
gelöst VBA-Makro verschwindet nach Speichern (5)

Frage von lupi1989 zum Thema VB for Applications ...

Neue Wissensbeiträge
Windows Tools

Zeit für Energiesparmodus, Bildschirmabschaltung etc. schnell anpassen

Anleitung von hannsgmaulwurf zum Thema Windows Tools ...

Linux Netzwerk

Ping und das einstellbare Bytepattern

(1)

Erfahrungsbericht von LordGurke zum Thema Linux Netzwerk ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(4)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Heiß diskutierte Inhalte
Firewall
Richtige Grundeinstellungen der Pfsense für mein Netzwerk (12)

Frage von Spitzbube zum Thema Firewall ...

Switche und Hubs
gelöst Cisco 2960x Stacking über mehrere Etagen (12)

Frage von b3scher zum Thema Switche und Hubs ...