Automatisches Datum und Speicherort beim Drucken

[Pywi]

Hallo meine lieben Corelianer

Ich suche mich gerade dusslig im Corel 11, ob man da etwas einstellen kann, damit bei jedem Ausdruck das Datum und der Speicherort mitgedruckt wird.

Gibt es das überhaupt?

Hoffe ihr habt mir eine Lösung.

Liebe Grüsse von Pywi, die sich in den Daten zu tode sucht. :tease:

[Nimbin]

Hi,

ich hatte mal ein ähnliches Problem und mich mit diesem Makro beholfen.
Es erzeugt dir automatisch auf jeder Seite des aktiven Dokuments einen Pfad- und einen Datumsstempel.

Mit 'Undo' kannst du die Aktion komplett rückgängig machen.
Also:
Schriftgrad und Größe in der Leiste einstellen -> Makro starten -> Drucken -> Undo

Gruß,
Nimbin


Sub PfadZeitStempel()

Dim i As Long
Dim doc As Document
Dim p As Page
Dim s As Shape

Set doc = ActiveDocument
doc.Unit = cdrMillimeter

doc.BeginCommandGroup "Pfad und Zeit Stempel"
For i = 1 To doc.Pages.Count
Set p = doc.Pages(i)

'*** 20 und 5 sind die Koordinaten in Millimeter gemessen von links unten ***
Set s = p.ActiveLayer.CreateArtisticText(20, 5, doc.FullFileName)
Set s = p.ActiveLayer.CreateArtisticText(190, 5, Date)

Next i
doc.EndCommandGroup
End Sub

[Nachtviole]

Hallo Pywi!

Im Druckdialog kannst Du im Tab „Druckvorstufe“ einstellen, daß Du Die Dateiinformationen mitdrucken möchtest und das Ganze innerhalb der Seite.
Im Tab „Allgemein“ kannst Du diese Einstellung als neuen Druckstil speichern und fortan verwenden.



Dabei wird die Info aber sehr an den Rand gedruckt, sodaß ein normaler Drucker Probleme bekommen wird. Wenn dem bei Dir so ist, melde Dich noch mal.

(Bitte entschuldige die miesen Farben im PDF aber CorelDraw druckt immer in CMYK-Modus, zumindest konnte ich ihm das noch nicht abgewöhnen.)

Viele Grüße von der Nachtviole

[Hartmut]

Hallo Nachtviole,
bei meinem X3 kann ich das im PDF Dialog aber einstellen,
unter Einstellungen/Erweitert.
Soory, ich bin drauf reingefallen:
ein Drucker kann nur 4farbig folglich wird das auch als CMYK angezeigt.

Ich mache für einen Kunden Flyer, die laß ich über das Internet drucken also verschicke ich CMYK pdf's.
Den gleichen Kram verteilt mein Kunde aber noch über seine Homepage und per E-Mail dafür bekommt er von mir extra ein RGB pdf.

[Pywi]

Ganz, ganz herzlichen Dank für die schnellen Antworten. :sei_gepriesen:

Wieder einmal eine Hürde genommen und meine grauen Hirnzellen etwas gekitzelt. ;-)

[Nachtviole]

Hallo Hartmut!

Danke für Deinen Hinweis.

Zum PDF erzeugen nutze ich normalerweise „Als PDF freigeben“, also den internen PDF-Erzeuger, dort kann ich wie Du beschreibst RGB einstellen.
Nur beim Drucken geht dies nicht. Aller anderen Programme „drucken“, wie ich es benötige, RGB-PDFs nur Corel leider nicht. :haue: Also wieder PDF-Export.
Auch mit externen Programmen wie Acrobat mit PitStop oder GSView kann man es zur Not hinbiegen.

Viele Grüße von der Nachtviole

[Hartmut]

Hallo Nachtviole,
schau mal ob bei Corel vielleicht das ICC Profil angeklickt ist. Dann abschalten, wirkt auf die Farbdarstelung Wunder.