Genau so ist das, wenn ich eine pdf mit dem creator erzeuge wird sie direkt angezeigt, das wollte ich lediglich beim corelexport auch haben bzw. wissen ob das geht. Ich werde sicherlich nicht meine Druckdaten mit dem pdfcreator erstellen, wenn Corel da einen wesentlich professionelleren Export liefert..denke ich jedenfalls. Den Grundsatz meiner Verzeichnisstruktur zu diskutieren war nicht wirklich hilfreich. Einige Dinge hier waren aber schon hilfreich, Danke.
Corel x5 nach Pdf Export
-
-
Also ich mach das immer so:
1.als pdf freigeben -speichern
2. noch einmal auf "als pdf freigeben"
dann bist sofort im Ordner, in der die erste pdf Datei steckt,
rechter Mausklick auf die Datei - dann i, Menü auf öffnen.
Gruß Torsten -
Kann man mit einem Macro lösen, habe ich hier ähnlich gemacht:
1. PDF wird automatisch in Kundenordner (bzw. im Ordner wo auch das aktuell geöffnete Corel Dokument liegt) gespeichert, mit dem Dateinamen "Druck "+Name_der_corel_datei.
2. PDF wird auf Desktop gespeichert (um es kurz zu kontrollieren und dann in den Hotfolder des Rips zu schieben).Geöffnet wird es allerdings nicht automatisch.
Macht aber nur Sinn wenn man immer die gleichen Exporteinstellungen verwendet da diese auch im Macro hinterlegt sind. Und bei umfangreichen PDFs dauerts natürlich länger weil es 2x exportiert wird.
-
So sieht das dann aus (PDF in Kundenordner):
Code
Alles anzeigen' PDF speichern With ActiveDocument.PDFSettings .PublishRange = 0 ' CdrPDFVBA.pdfWholeDocument .PageRange = "" .Author = "Guido Voutta" .Subject = "" .Keywords = "" .BitmapCompression = 3 ' CdrPDFVBA.pdfZIP .JPEGQualityFactor = 2 .TextAsCurves = True .EmbedFonts = True .EmbedBaseFonts = True .TrueTypeToType1 = True .SubsetFonts = True .SubsetPct = 80 .CompressText = False .Encoding = 1 ' CdrPDFVBA.pdfBinary .DownsampleColor = False .DownsampleGray = False .DownsampleMono = False .ColorResolution = 300 .MonoResolution = 600 .GrayResolution = 300 .Hyperlinks = False .Bookmarks = False .Thumbnails = False .Startup = 0 ' CdrPDFVBA.pdfPageOnly .ComplexFillsAsBitmaps = False .Overprints = False .Halftones = False .SpotColors = True .MaintainOPILinks = False .FountainSteps = 256 .EPSAs = 0 ' CdrPDFVBA.pdfPostscript .pdfVersion = 3 ' CdrPDFVBA.pdfVersion14 .IncludeBleed = False .Bleed = 0 .Linearize = False .CropMarks = False .RegistrationMarks = False .DensitometerScales = False .FileInformation = False .ColorMode = 3 ' CdrPDFVBA.pdfNative .UseColorProfile = False .ColorProfile = 1 ' CdrPDFVBA.pdfSeparationProfile .EmbedFilename = "" .EmbedFile = False .JP2QualityFactor = 10 .TextExportMode = 1 ' CdrPDFVBA.pdfTextAsAscii .PrintPermissions = 0 ' CdrPDFVBA.pdfPrintPermissionNone .EditPermissions = 0 ' CdrPDFVBA.pdfEditPermissionNone .ContentCopyingAllowed = False .OpenPassword = "" .PermissionPassword = "" .ConvertSpotColors = False End With Dim weg As String weg = ActiveDocument.FilePath & "Druck " & ActiveDocument.FileName & ".pdf" ActiveDocument.PublishToPDF weg ' Ende PDF speichern
Nachtrag:
Zum speichern auf den Desktop muss nur folgende Zeile geändert werden: -
Das mit der rechten Maustaste wie Kuddel beschreibt ist mein Favorit.. da kann man mal sehen wie blind man manchmal ist... Danke!