Neuigkeiten:

Ist euer Problem gelöst, dann bitte den Knopf "Thema gelöst" drücken!

Mobiles Hauptmenü

Per Access-VBA bei Word Farbdruck erzwingen

Begonnen von cyberchris, Dezember 04, 2016, 10:18:00

⏪ vorheriges - nächstes ⏩

cyberchris

Guten Morgen,

gibt es eine Möglichkeit per VBA bei Word einen Farbdruck zu erzwingen?

Folgende Ausgangslage:
In Access VBA öffne ich ein Wordformular (word 2010) und setzte einige Parameter und drucke das Dokument dann. Die Drucker sind standardmäßig auf Graustufen eingestellt - ändern nicht möglich.

Diese spezielle Dokument muss aber in Farbe gedruckt werden.
Kann man diesen Parameter mitgeben? Per Makroaufzeichnung in Word konnte ich diesen Parameter aber nicht finden.

Was ich bereits setze ist folgendes:

                With objWord.ActiveDocument.PageSetup
                    .FirstPageTray = Drucker2.Value
                    .OtherPagesTray = Drucker2.Value
                End With

Besten Dank
Christoph

markusxy

So wie in Access wird es in Word auch ein Printer Objekt geben.
Dort solltest du das einstellen können.

Schau einfach mal in der VBA Hilfe nach.

LG Markus

cyberchris

Hallo,

danke für deine Antwort.
Gegoogelt habe ich schon - nur nichts brauchbares gefunden. Es gab auch Antworten dass es in Word nicht möglich sein. Eine Makroaufzeichnung hat auch nichts gebracht.
Ich komme daher nicht weiter.

Gruß Christoph

MaggieMay

Hi,
ZitatDie Drucker sind standardmäßig auf Graustufen eingestellt - ändern nicht möglich.
das wird dann wohl auch nicht per VBA funktionieren - wie kommst du auf die Idee?!
Freundliche Grüße
MaggieMay

cyberchris

Hallo,

ich wollte damit nur ausdrücken dass diese Standardeinstellung im Drucker nicht geändert werden kann - jedoch natürlich kann ich temporär manuell auf Farbdruck umstellen.
Aber diese Umstellung benötige ich per VBA.

Danke
Gruß Christoph

Lachtaube

Das läuft dann wohl auf API-Programmierung hinaus und gelingt nur mit lokalen Druckern ohne Adminrechte - siehe z. Bsp. Controlling the Printer from Word VBA
Grüße von der (⌒▽⌒)

cyberchris

Hallo,

OK. dann kann ich es vergessen, da es bei uns um Netzwerkdrucker handelt.

Problem nicht lösbar:-(

Gruß Christoph