[CDR X5-X8] Publish to PDF

dastin

dastin

Некромант-любитель
Топикстартер
15 лет на форуме
Сообщения
2 332
Реакции
2 224
CorelDRAW macros Publish to PDF
Экспорт в ПДФ текущей или всех страниц документа
с заданными параметрами по цвету, разрешению растра, местоположению и наличию вылетов (bleed)
Собран в CorelDRAW Х5, работает во всех последующих версиях, как х86, так и х64.
При активной галке "Home" экспорт будет осуществлён в каталог сохранённого документа,
иначе - в один из предварительно заданных каталога для экспорта.
При активной галке "Bleed" PDF будет экспортирован с блидами 3,175 mm (дефолтное значение)
Все выставленные параметры сохраняются при последующих вызовах макроса.

1645872862078.png
 

Вложения

Последнее редактирование:
  • Спасибо
Реакции: Slx1, izrukvruki и mnemonix
George сказал(а):
Чем оно лучше родных возможностей?
Нажмите, чтобы раскрыть...
функционально - ничем
сделав в стандартном интерфейсе гораздо больше, нежели в макросе ,
кликов настройки,
выбора пресетов,
каталогов для сохранения,
набора текста
достигается ровно тот же результат
 
  • Спасибо
Реакции: kuterma2 и took
dastin сказал(а):
CorelDRAW macros Publish to PDF
Экспорт в ПДФ текущей или всех страниц документа
с заданными параметрами по цвету, разрешению растра, местоположению и наличию вылетов (bleed)
Собран в CorelDRAW Х5, работает во всех последующих версиях, как х86, так и х64.
При активной галке "Home" экспорт будет осуществлён в каталог сохранённого документа,
иначе - в один из предварительно заданных каталога для экспорта.
При активной галке "Bleed" PDF будет экспортирован с блидами 3,175 mm (дефолтное значение)
Все выставленные параметры сохраняются при последующих вызовах макроса.

Посмотреть вложение 150408
Нажмите, чтобы раскрыть...
У меня есть еще параметр про сжатие...
1645959477623.png
 
  • Спасибо
Реакции: Nikle
Update - version 6e
- JPG compression
+ ZIP compression
+ GrayScale mode
+ Resolution Mode "As Is"
+ Crop Marks checkbox
+ Curve Font checkbox
+ As Separated Page checkbox (DocName + #Page.pdf)
Собрано под Х5 - работать будет во всех X5 => версиях CorelDRAW
В архиве также bas, frx, frm

1693797452700.png
 

Вложения

Последнее редактирование:
  • Спасибо
Реакции: kuterma2, DukereD, mnemonix и ещё 1 человек
dastin сказал(а):
Update - version 6e
- JPG compression
+ ZIP compression
+ GrayScale mode
+ Resolution Mode "As Is"
+ Crop Marks checkbox
+ Curve Font checkbox
+ As Separated Page checkbox (DocName + #Page.pdf)
Собрано под Х5 - работать будет во всех X5 => версиях CorelDRAW
В архиве также bas, frx, frm

Посмотреть вложение 160495
Нажмите, чтобы раскрыть...
А есть способ поменять Bleed чтобы по умолчанию тут было 2мм?
 
dastin сказал(а):
найти строку
.Bleed = 31750
исправить на
.Bleed = 20000
Нажмите, чтобы раскрыть...
А подскажи поточнее (я не спец в макросах) - жму правой кнопкой -> edit в панели макросов - там не нахожу .Bleed строки... Не туда тыкаю...

(вижу чтото такое только:
Option Explicit

Public fLeft As Double, fTop As Double, wLeft As String, wTop As String, cboxFPathE As String
Public e As Long, p As Page, PathName As String, PName As String, PresetUp As String
Public PresetList As Variant, intCount As Integer, str As String, r As Integer, q As Integer, z As Integer

Sub Publish_PDF_2()
UF_PDF2.Show vbModeless
End Sub
 
Последнее редактирование:
в КОДЕ
а не в объекте
 
  • Спасибо
Реакции: kuterma2
" ... по совету друзей ..."
Update - version 6f
+ All Open Document
1715002689378.png
 

Вложения

Последнее редактирование:
  • Спасибо
Реакции: kuterma2, mnemonix и izrukvruki
Update 6g
+ custom bleed
1715075920999.png


... что касается On/Off Profile
мне сдается, что они встраиваются независимо от UseColorProfile = False/True
УТОЧНЮ - в стандартной Publish to PDF - галка работает как положено
... надо будет ещё на новой версии проверить
 

Вложения

Последнее редактирование:
  • Спасибо
Реакции: kuterma2

Вложения

Последнее редактирование:
  • Спасибо
Реакции: kuterma2, Battaloff и izrukvruki
Для ответа нужно войти/зарегистрироваться
Верх Низ