I've asked this question before but did not get an answer so I'll ask it again.
Is there a way to automate the conversion of each page in a document into a bitmap before I publish it to PDF? I don't mean exporting each page to bitmap.
that's a great idea Jeff!
With ActiveDocument.PDFSettings .PublishRange = 0 ' CdrPDFVBA.pdfWholeDocument .PageRange = "" .Author = "Greg Gutierrez" .Subject = "" .Keywords = "" .BitmapCompression = 2 ' CdrPDFVBA.pdfJPEG .JPEGQualityFactor = 100 .TextAsCurves = False .EmbedFonts = False .EmbedBaseFonts = False .TrueTypeToType1 = True .SubsetFonts = True .SubsetPct = 80 .CompressText = True .Encoding = 1 ' CdrPDFVBA.pdfBinary .DownsampleColor = True .DownsampleGray = True .DownsampleMono = True .ColorResolution = 96 .MonoResolution = 120 .GrayResolution = 96 .Hyperlinks = True .Bookmarks = False .Thumbnails = False .Startup = 0 ' CdrPDFVBA.pdfPageOnly .ComplexFillsAsBitmaps = True .Overprints = False .Halftones = False .SpotColors = False .MaintainOPILinks = False .FountainSteps = 256 .EPSAs = 1 ' CdrPDFVBA.pdfPreview .pdfVersion = 6 ' CdrPDFVBA.pdfVersion15 .IncludeBleed = False .Bleed = 0 .Linearize = True .CropMarks = False .RegistrationMarks = False .DensitometerScales = False .FileInformation = False .ColorMode = 0 ' CdrPDFVBA.pdfRGB .UseColorProfile = False .ColorProfile = 1 ' CdrPDFVBA.pdfSeparationProfile .EmbedFilename = "" .EmbedFile = False .JP2QualityFactor = 100 .TextExportMode = 1 ' CdrPDFVBA.pdfTextAsAscii .PrintPermissions = 0 ' CdrPDFVBA.pdfPrintPermissionNone .EditPermissions = 0 ' CdrPDFVBA.pdfEditPermissionNone .ContentCopyingAllowed = False .OpenPassword = "" .PermissionPassword = "" .ConvertSpotColors = True .EncryptType = 0 ' CdrPDFVBA.pdfEncryptTypeNone End With ActiveDocument.PublishToPDF "C:\Documents and Settings\computer1\Desktop\13-0227 #2304 MJ Harlem New York, NY.pdf"
If I want to publish a pdf using above code, how do I tell the macro to use the currently-named file? also, I need to let the user pick the save location for the pdf so how can I do this as well?