CorelDRAW 11-X3 макросы -=::wOxxOm::=-

Вид

CorelDRAW :: VBA макросы :: wOxxOm

RSS
Atom

Включите JavaScript для просмотра дополнительной информации о макросах

RecentFiles--Nov30

RecentFiles. Анлимитед

Ноябрь 30: (важно) исправлено: не "отпускал" картинки, не давая их перезаписывать в других прогах

Ноябрь 21: Новое: показ доп.инфы для картинок / PDF

Ноябрь 11: (важно) теперь пропускает '..' при удалении файлов

10 000+ файлов в истории документов с удобным управлением и дополнительными функциями
Прекрасно заменяет диалог открывания файлов и окно Приветствия в CorelDraw
Управление файлами - быстрый поиск, предпросмотр, Ctrl-C/X/V, перетаскивание файлов.

Совместим с CorelDraw 11, 12 & X3
Автоматическое отслеживание истории документов.
автоматически закрывается/минимизируется (клавиша <Esc>) и появляется когда закрыт последний документ (в Опциях)
Сортировка и быстрый поиск по имени/папке/дате, c мгновенным отображением результата
Превьюшка. Для документов CorelDRAW – с указанием версии сохранения
CDRinfo+ (опции) показывает кол-во и размер страниц, dpi, шрифты, инфу о linked картинках, и т.п.
(правая кнопка мыши на информации позволяет сменить ед.изм. размера страницы)
Файловая панель с превьюшкой (правой кнопкой по превьюшке чтобы изменить ее размер) для большинства графических файлов - CDR, CDT, CMX, DES, PAT, TIF, PSD, JPG, BMP, WMF, EMF, CRW, NEF, EPS, причем 90% показываются действительно мгновенно, используя встроенные в них превьюшки. Для TIF/JPG с увеличенной областью превьюшки можно увидеть более качественную версию, полученную чтением всего файла, нажав левой кнопкой на превьюшку.
Предпросмотр содержимого папки, то есть сразу видно что лежит в выбранной папке
Выбор папки стандартным окном папок Проводника, с запоминанием расположения это окна.(Клавиша <F4>)
Избранные папки (размер области на экране для них можно изменить - над ними есть полоска, ее можно тянуть)
Открывает и импортирует сразу несколько файлов (Клавиша <Enter>, для импорта <Alt> и двойной щелчок)
Удаление документов из списка истории, удаление в корзину (Клавиша <Del>, <Ctrl-Del> )
Функция автопометки уже несуществующих файлов в истории с удалением
Переименование файлов с синхронизацией истории (даже для папок)
Перетаскивание файлов/папок в окно макроса чтоб перейти к этому файлу/папке. Перетаскивать из окна макроса в другие программы, например картинку в PhotoShop – для редактирования, или файл в окно Проводника – для копирования
Стандартные операции с файлами через буфер - копирование/вырезание/вставка (Ctrl-C/X/V), работает совместно с окнами Проводника. При CtrlX, CtrlV в пределах окна макроса происходит синхронизация истории с новой папкой файла
Опция "LastView" - сохранение масштаба, положения и номера страницы в сохраненных документах, так что при открывании в следующий раз сразу можно продолжать с места последнего редактирования
Автопометка растровых картинок их именем/папкой на диске, что будет видно в статус-строке при выделении объекта [идея: Lev], для умещения длинной строки можно убрать из статуса элемент с подсказками по инструменту, и на его место перетянуть информацию по объекты (делается, удерживая клавишу Alt)
кнопка "Найти растр" - переходит к дисковому исходнику вставленной картинки при нажатии на кнопку с Alt - находит в документе (или во всех открытых) подсвеченную в окне макроса картинку с диска
Автоматическое извлечение из .CRW & .NEF встроенных jpeg при перетаскивании/импорте
Изменение и сохранение размеров окна, колонок списка, вида списка (опции)
Две полоски для изменения размера области файлов и избранных папок
Управление всеми возможностями с клавиатуры (см. встроенную справку и подсказки к элементам окна)
Выбор языка интерфейса, русский / английский

Если не запускается:
1. обновите Microsoft CommonDialogs OCX или (пере-)установите MSOffice
2. При запуске макроса включите опцию Автозапуск в настройках макроса.
3. Выключите в CorelDRAW в меню опций Tools >> Options >> VBA >> Delay load VBA ("Отложенный запуск")

История документов: C:\Documents and Settings\**Ваша учетная запись**\Application Data\Corel\recentFiles.ini
Настройки макроса: C:\Documents and Settings\**Ваша учетная запись**\Application Data\Corel\recentFilesOptions.ini

Nov21 - показывать X x Y x цветность @ dpi (размер в мм) лдя картинок, число фреймов в GIF/TIF, mediabox (размер страницы) и кол-во стр. для PDF
Nov11 - ВАЖНО! теперь пропускает '..' при удалении файлов
Sep19 - какие-то исправления
July03 - Импорт через макрос - клик мышкой для импорта в указанное место документа, <Пробел> использует позицию из файла для импорта (для векторных), <Enter> - по центру страницы
импорт 'PSInterpreted' :: сохраняет ответ и использует для всех оставшихся выделенных файлов
запоминается последняя использованная папка для сохранения новых документов
путь к Ghostscript можно указать в опциях
Jun10 - PDF, PS, AI, PRN, EPS отображаются в просмотре. GhostScript нужен в большинстве случаев.
May31 - в режиме сохранения :: даблклик по файлу в панели папок - сохраняет в этот файл (с запросом перезаписи)
Mar29 - разные исправления

wx_Tools [на macromonster.com]

wx_TOOLS :: набор макросов

2008 Март,1 selectInside
2007 ноябрь,28 BitmapsResizer

wx.PClipPick - выбор объекта внутри поверклипа без вхождения в режим его редактирования, под указателем мыши. Работает только при назначении макросу горячей клавиши, например: назначьте две, "W" и "Shift-W" (с Shift для того чтобы выбирать несколько внутри поверклипа). Если выбран поверклип внутри поверклипа то повторный вызов макроса будет выбирать уже в этом вложенном.
wx.ZoomOutBack - (для DrawX3) назначьте на F3, восстанавливает правильное (до Х3) поведение этой клавиши (переход к последнему масштабу зума, что удобно при возврате после экстремального увеличения масштаба)
wx.ZoomFullPage - назначьте на Shift-F4, для замены стандатной функции показа всей страницы (5% вместо 20% пустого пространства вокруг страницы)
wx.ScrollScreenDown, ...Up ...Left ...Right ...DownRight ...UpRight ...DownLeft ...UpLeft - Перелистывание экрана на 80% по направлениям: Вниз, Вверх, Влево, Вправо, ВнизВправо, ВверхВправо, ВнизВлево, ВверхВлево. Удобно если назначить на клавиши Ctrl-Alt-Numpad (1..9, по направлению перемотки)
wx.InvertSelection - инверсия выделения
wx.selectInside 2008 март,1: usage: select a lot of small shapes, run the macro, click some big shape (not in Wireframe view)- all the objects inside the big one will be selected.
wx.selectComplexCurves - для поиска кривых с числом узлов более заданного
wx.selectSmallObjects - для поиска (и, если ответить Yes, удаления) мелких объектов, меньше чем заданный размер. Удобно для подчистки результатов трассировки
wx.selectSameFillColor, wx.selectSameFillAndOutline, wx.selectSameOutline, wx.selectSameDialog
Выбор объектов с совпадающими с текущим объектом цветом заливки / заливки и обводки / обводки / интерактивный диалог (см. картинку). Удобно например назначить на клавиши: F, Ctrl-Shift-F, Shift-F. Выбираются только объекты вне групп. Для выбора так же и внутри групп (без разгруппировки!) макросами без диалога - включить индикатор ScrollLock, вызвать макрос и ввести отрицательное число. Кстати само по себе это число задает степень различия цвета для выбора.
wx.CreateFountain - быстрое и удобное создание многоцветовых градиентов. Создайте много простых разноцветных объектов (например прямоугольников), выделите их и запустите макрос, затем укажите фигуру для заливки градиентом. Угол воображаемой линии, проходящей через центры крайних исходных объектов, используется для градиента (см. картинку).

Подсказка: для быстрого воссоздания градиента из цветов битмапа: создайте сколько нужно прямоугольничков, переключитесь на инструмент пипетка, установите вверху его режим в ColorSampler, а теперь нажимайте один раз на картинке и потом с Shift - на очередном прямоугольничке. Повторите сколько надо, затем запускайте макрос.
wx.ConvertShapesToCMYK - перевести объекты, в том числе битмапы, в CMYK (выбранное / весь документ).
Используется активный цветовой профиль в Tools->Color Management
wx.transparentEdge - прозрачный край для простых объектов (в т.ч. битмапов). Работает странно :-) потому, что используется нестандартный метод. Сбросить эффект рузмеется можно, выбрав, например, инструмент Transparency ("рюмка") и нажать там на кнопку сброса.
wx.TextToCurves - текст в кривые в выбранном или всем документе, включая и поверклипы.
wx.OutlinesToQ_KillEmpty - перевод обводки в кривую с удалением исходной фигуры, если она без заливки и без обтекания текста / поверклипа / эффектов / меш
wx.outlineBehind - обводка "под низом" (чтобы не заходить в диалог свойств обводки). Shift-клик (и Ctrl-клик) на кнопке вызова макроса - обычная обводка
wx.outlineCorners - обводка со скругленными углами, Ctrl-клик: острыми, Shift-клик: срезанными
wx.OutlineIncrease & OutlineDecrease - увеличение / уменьшение толшины обводки без диалога для всех выделенных объектов относительно их исходной обводки в индивидуальном порядке. У меня назначено на Ctrl-Alt-СтрелкаВверх и Ctrl-Alt-СтрелкаВниз
wx.OutlineEqualsFill - сделать цвет обводки такой же как у заливки для выделенных объектов в индивидульном порядке. Очень полезно для устранения дефектов отображения результата трассировки в Х3 (призрачные белые обводки)
wx.GuideHorizontal, GuideVertical - создать направляющую горизонтальную / вертикальную в позиции указателя мыши. Только для вызова с клавиатуры (например, H и V)
wx.PasteAtMouse - вставка из буфера в позиции указателя мыши. Только для вызова с клавиатуры (например, Ctrl-Shift-V)
wx.ForEach - повторить последний простой трансформ объекта на множестве выделенных объектов индивидуально. "Простой" означает повторяемый через Ctrl-R. - исправлен баг с повторением вращения
wx.BlendSplit - (только в Х3) расщепить бленд в позиции указателя мыши. Только для вызова с клавиатуры. Для многосоставных (compound) бленд сначала надо выделять с Ctrl нужный сегмент. Помимо прочего удобства, макрос исправляет баг - слет угла созданного управляющего субобъекта на блендах по пути с автовращением
wx.sizePagetoFIT - сделать размер страницы равным размеру области объектов + заданный в окне зазор (числа округляются при нажатии OK с Shift или Shift-Enter)
wx.pageNamesAsNumbers - убрать названия страниц (удобно чтобы внизу экрана помещалось больше "ярлычков" страниц)
wx.dupOnNextPage - дублирование выделнных объектов на следующую страницу без использвания буфера. Слои не учитываются. Удобно в случае большого объема данных
wx.OverprintsRemove - Убрать все оверпринты, в т.ч. с битмапов (Х3) на выделенных объектах или во всем документе
Следущие три макроса для битмапов работают с выделенными объектами или всем документом, в т.ч. и внутри поверклипов. В конце выводят постраничную статистику
wx.BitmapsDownsample - ресэмлировать картинки на выбранное dpi, если текущее dpi картинки превышает заданное более чем на 20%.
wx.BitmapsSetDPI - сменить dpi битмапов *без* ресэмплирования (меняется геометрический размер).
wx.BitmapsToPowerclips - поместить битмапы в прямоугольные поверклипы по размеру картинки. Можно указать зазор.
wx.BitmapsResizer - изменить геометрические размеры битмапов *без* ресэмплирования.
В окне настройки можно указать размеры и опции (например, 100 0 ap):
— сохранять пропорции - один из размеров равен 0, он и будет подстраиваться автоматически
— игнорировать пропорции - оба размера не нулевые
— обрабатывать весь документ - указана английская буква A (от слова All)
— смотреть внутри поверклипов - указана английская буква P (от слова Powerclip)

Макросы от Sancho — Document INFO и многое другое: allmacros.ru

Исправления дляDRAW X4

wx_X4fixTIFexport

• Экспорт TIF из DRAW X4 в Photoshop CS3

Этот макрос автоматически исправляет экспорт TIF в DRAW X4 и делает файлы совместимые с Photoshop CS3. Достаточно просто установить макрос и забыть о проблеме. Единственное необходимое условие для макроса, которое кстати по-умолчанию проверяется в установщике макроса, это опция: Tools->Options->VBA->DelayLoadVBA = отключено

wx_X4addBitmapInfo

• DPI для битмапов в строке статуса DRAW X4

Этот макрос автоматически показывает небольшое горизонтальное окно со свойствами битмапа, в т.ч. DPI. Разместить лучше всего, на мой взгляд, поверх соответствующей секции строки статуса. Единственное необходимое условие для макроса, которое кстати по-умолчанию проверяется в установщике макроса, это опция: Tools->Options->VBA->DelayLoadVBA = отключено

Улучшения интерфейса

CDRbigOptions 1.2.1

• Увеличенные окна опций DRAW/PAINT

2008 Mar, 4 + FontNavigator

Эта программа-патч расширяет окна опций DRAW 11,12,X3,X4 — Настройка комманд и панелек, Текст автозамены, Стили текста, Конверты, Связи типов файлов, Активные фильтры импорта/экспорта, Предупреждения, Настройки совместимости принтера. NEW + FontNavigator

На маленькие картинки можно нажать и увидеть полноразмерную.

images/thumb_bigOptFontNavDuplicates.png

wx_ToggleToolBars

• Интерфейс :: вкл/выкл — аналог Tab в Adobe PS/Illy

2008 фев 24 панелька докеров теперь переключается в DRAW Х4 тоже

wx.ShowHideToolbars - показывает/прячет заголовок CorelDRAW, меню, статус, панели кнопок, линейки, направляющие, палитры, докеры, панель задач Windows. Назначьте, например, на Alt-~ (рядом с Tab)
wx.SetupShowHideToolbars - диалог настройки списка элементов интерфейса для переключения видимости. Настройки сохраняются и используются основным макросом ShowHideToolbars
wx.LockToolbars & wx.UnlockToolbars - закрепить тулбары на месте
wx.guidesToggleEdit - Переключает редактируемость мастер слоя направляющих мышью
wx.DockersShufflerToggle - Переключает панель докеров - для управления ее видимостью с клавиатуры

Памятка, если вы не назначили клавишу для макроса и спрятали меню:
1. нажать и держать клавишу Alt (до шага 5)
2. правой кнопкой мыши нажать в пустом месте окна
3. в появившемся меню нажать правую же кнопку
4. включить "Menu" (как обычно левой кнопкой)
5. отпустить Alt

CorelPanScroll

• Панорамирование колесом мышки (аналог Adobe)

При запуске в трее Windows появляется новый значок, и программа фильтрует колесо мыши в окнах CorelDRAW / PhotoPAINT, меняя масштабирование на прокрутку

Колесо - прокрутка по вертикали. Alt+Колесо - по горизонтали.
Ctrl+Колесо - зум. Shift+Колесо - зум плавно в DRAW (или быстро в PhotoPAINT)
Колесо нажато без вращения - быстрое панорамирование движениями мыши
Настройка запуска вместе с CorelDRAW:
1. Создайте ярлык для CorelPanScroll.zip
2. в его свойствах ярлыка отредактируйте командую строку запуска, добавив после пробела полный путь к CorelDRW.zip в кавычках
  например, так: "C:\путь\CorelPanScroll.zip" "c:\Program Files\Corel\CorelDRAW Graphics Suite 13\Programs\CorelDRW.zip"
3. Этим ярлыком теперь и запускайте CorelDRAW.
[ Исходник скрипта AHK ]

paintMaximizer

• PhotoPAINT во весь экран

PPapiTimer.PaintMaxEdit - открывает PhotoPAINT во весь экран для выделенной картинки
PPapiTimer.PaintMaxSetup - настройщик, если ответить Yes, то PhotoPAINT будет во весь экран при выборе "Edit bitmap" в меню правой кнопки (и при двойном щелчке на картинку в CorelDRAW 12 либо настроенном через реестр DrawX3 - HKEY_CURRENT_USER\Software\Corel\CorelDRAW\13.0\CorelDRAW\Application Preferences\Bitmaps -> EditBitmapOnDoubleClick -> 1)

wx_SyncWindows

• 2 окна, 2 типа отображения синхронно для одного документа

wx.SyncWindowsToggle создает второе окно для документа, в котором синхронно отображает в режиме Wireframe (каркас). Повторный запуск макроса отключает этот режим и закрывает дополнительное окно.
Настройка режимов просмотра — в коде макроса (Tools->VisualBasic->Editor или удобнее черезMacroInstaller)

wx_XMLIcons

• Сохранение своих рисованных иконок интерфейса

CHMFontSize

• Увеличение размера шрифта в Справке (Help) 2008 фев 21

Эта программка увеличивает шрифт в файлах справки .CHM формата, заменяя фиксированные и маленькие значения размера шрифтов на пропорциональные. В диалоговом окне можно указать дополнительный процент увеличения (по-умолчанию 100%)

Также в Справку добавляется кнопка смены шрифта на лету во время просмотра!

Использование: перейти к папке программы и нажать Search & queue subfolders, затем Process queue list

Перевод :-)
create backup = оставлять копию оригинала
Search & queue subfolders = поиск по вложенным папкам с добавлением в список обработки
Process queue list = обработать список

images/CHMFontSize.png images/CHMFontSizeExample.png

Цвет...

curveChannelMixer

• Векторный Микшер Каналов CMYK

Мгновенный предпросмотр
Визуальное управление (движки) и ручной ввод значений для точного управления
Сохранение наборов установок. Загрузка выбранного – по двойному щелчку

копирование/замена каналов перетаскиванием метки канала на другую (держать Ctrl для копии)
преобразование в CMYK (опция "Convert to CMYK") — требуется для обычных клипартов
работает с заливкой и/или обводкой
держать <Shift> при управлении ползунками для изменения по 10%
держать <Ctrl> — для одновременной смены значений
держать <Alt> — для пропорционального изменения текущих значений ("резиновый" режим)
Наборы сохраняются в %AppData%\Corel\Graphics13 / 12 / 11 \User Custom Data\CurveChannelMixer.ini

скачать с форума

• ColorReplacer от Oberon - наши более продвинутые варианты

Версии от wOxxOm и Lev
разработка и скачивание наhttp://forum.oberonplace.com/showthread.php?t=1053

wx_PantoneTint

• Оттенки Pantone. Аналог Duotone для вектора, текста, 1bit ч/б

Битмапы...

wx_ExportJPG

• Экспорт в битмапы постранично с нумерацией

2008 фев 01 Добавлена заплатка для бага X4 при экспорте в TIF

Нумерованная последовательность JPG, TIF, GIF, PNG, BMP, и даже CDR (с опциональным преобразованием текста в кривые)
Выбор страниц, префикса файла, начального номера, кол-ва цифр, размера полученных картинок
Припуск (блид). При включении - экспортирует всю область страницы + блид.
Выкл. - для экспорта только фактической области, занятой объектами
5 цветовых моделей, включая индексированную с настраиваемыми параметрами

wx_ImportWithName

• Импорт с именем картинок и коррекция DPI

import.ImportBitmapWithName — создает плавающее окошко, на которое можно перетаскивать файлы из папок Проводника
— картинки проимпортируются с файловым именем и/или папкой в статусбаре и менеджере объектов.
— Доп.функция для jpg 72/96 dpi: если держать держать Ctrl то используется коррекция DPI (удерживайте Alt для игнорирования коррекции DPI).
— Опции - по правой кнопке. Положение на экране запоминается. Подсказка в меню [About]

Примечание: чтобы видеть в статусе dpi - уберите поле 'Подсказка' и измените размер и положение для 'Информации' и 'Деталей' (с нажатой клавишей Alt подвести курсор к концу элемента статусбара, нажать и тянуть вправо. Надежнее это сделать можно, находясь в диалоге опций Customization->Commands, и выбраь простым нажатием сначала нужный элемент прямо в статусбаре, а потом уже изменять его размер)

Стандарт:
Настроено:

wx_fixImportDPI

• AutoDPI для импортированных битмапов

wx.setDpi - устанавливает введенное dpi для битмапов (выделенных/всех на странице)
wx.setDpiSetup - настройка автоматической установка dpi при импорте битмапов (0 = выключить)

wx_ShowLinkBitmap

• Линкованные картинки :: переимпортировать в 100% качестве

• См. также несколько макросов в wx_Tools :: wx.Bitmaps....

Работа с объектами, слоями...

wx_NodeAlign

• Быстрое выравнивание узлов 2008 фев 21

wx.NodeAlignLeft, ...Right, ...XCenter, ...Top, ...Bottom, ...YCenter - эти макросы выравнивают узлы аналогично стандартным клавишам L,R,C,T,B,E (лево, право, середина гориз., верх, низ, середина верт.), поддерживается выделение узлов с разных объектов одновременно.

Примечние: Так как DRAW не передает информацию об узле выбранном в последнюю очередь в VBA макрос, то все выравнивания абсолютны, например NodeAlignLeft всегда выравнивает по самому левому узлу. Решение :-) сначала выравнять все узлы кроме "правильного", затем выполнить макрос, теперь выбрать дополнительно "правильный" узел и запустить макрос еще раз (все это очень быстро делается если макрос назначен на клавишу)

wx_showLayer

• Layers: управление слоями

Памятка для тех кто обновляет с очень старой версии: вручную удалите showlayer.gms (теперь имя файла wx_showlayer.gms)

mLayer.ActivateLayerSetup - настройка автоактивации слоя выделенного объекта.
— Упрощает работу с многослойными документами
— Доп.инфо. в шапке CorelDRAW: слой, цветовой профиль, имя документа

mLayer.toggleLayerAutoActivation - Вкл./выкл. автоактивацию слоя выделяемого объекта

mLayer.GroupAndSaveLayers - Для сохранения информации об исходных слоях при копировании через буфер. Создает объект-группу, который можно копировать, сохранять, переносить в другой документ.
mLayer.UnGroupAndAssignLayers...... - Распределяет объекты из ранее созданной группы, три варианта:
...Skip - по СУЩЕСТВУЮЩИМ слоям
...One - То же, а также создает слой "From deleted layers" для объектов, слоев которых нет в данном документе
...CreateAll - СОЗДАЕТ все необходимые слои и распределяет объекты из группы (порядок слоев не запоминается)
mLayer.ScatterToNewLayers - перед экспортом в PSD — помещает каждый объект в документе на свой отдельный слой, в результате чего при экспорте в .PSD в файле будет слой для каждого объекта.
mLayer.LayerFromSelected - Создание нового слоя из выделенных объектов, имя у нового слоя - как у активного и знак +
mLayer.SelectLayerShapes - Выделяет все объекты со слоев текущих выделенных объектов
mLayer.LayerPrevious, LayerNext - Сменить активный слой
mLayer.LayerMoveUp, LayerMoveDown - Передвинуть активный слой вверх или вниз.
mLayer.SelectLayer - Активировать слой выделенного объекта
mLayer.MoveShapesToCurrentLayer - Переместить выделенный объект на активный слой
mLayer.MergeLayersToCurrent - Склеить слои выделенных объектов с текущим.
mLayer.LabelLayer - Переименовать слой текущего объекта или активный слой, если ничего не выделено
mLayer.DeleteLayer - Удалить слой текущего объекта или активный слой, если ничего не выделено

wx_BarCodeCurves

• BarCodes в кривые (используя фильтр EPS)

wx_outlineNONScaled

• Обводки :: автомасштаб вкл/выкл (wx.OutlinesScaledON / OFF)

removeUnderlyingDups

• Дедубликатор и коннектор

wx.removeUnderlyingDups - выделяет копии объектов лежащие друг над другом и предлагает их удалить
wx.nodeClean2 - для соединения разбитых на кусочки линий в раздельных объектах с геометрически общими концами в одну замкнутую кривую
wx.CtrlShiftQ_dispose - устаревший, заменен наwx_Tools :: wx.OutlinesToQ_KillEmpty

Разные макросы

wx_MacroInstaller

• Макро инсталлер

Быстрое создание кнопочек для макросов
Запуск макросов из списка

Поиск макроса в списке ведется по всем сразу макросам по части имени. Не покидая строки поиска можно нажимать клавиши Вверх/Вниз и переходить к след./пред. совпадению

Скриншот полного варианта и кнопочек: установщик & кнопочки

wx_PatchDraw

• Динамическая настройка DrawХ3 (только DrawX3.0.739)

patch.CLOLreadToggle - отключить чтение из CDR файлов цветовых стилей ColorStyles для ускорения их открывания
patch.CLOLwriteToggle - отключить запись цветовых стилей ColorStyles в CDR файлы для уменьшения размера и ускорения их записи
patch.NodeGlyph2xToggle - переключить двойной размер невыделенных маркеров узлов в режиме редактирования кривых
patch.NodeGlyphColoredToggle Сент,30: переключить расцветку маркеров узлов в зависимости от типа узла (NodeColorCoding)
patch.SnapRadiusSet Окт,13: увеличить силу привязки в несколько раз. Удобнее работать с Snap-to-Objects и направляющими. Сам CorelDRAW выставляет максимум 15, а макрос - до 35.
patch.SnapRadiusStd10, SnapRadiusMax35 Окт,13: установить стандартную силу привязки (10) и максимальную (35)
patch.SlowZoomToggle - переключить скорость зуммирования колесом мыши - быстро/медленно. Скорость Shift-прокрутки тоже меняется.
patch.ZoomLevelLimitToggle Nov,15: убрать сообщения о достижении предела зума "Maximum (minimum) zoom level achieved reached"
patch.CrossHairToggle - указатель мыши - перекрестье на весь экран
patch.DispImageAntiAliasToggle - антиалиасинг (сглаживание) битмапов в режиме просмотра Улучшенный (Enhanced)
patch.Setup - настройщик автозагрузки настроек при запуске CorelDRAW
работает только на версии 13.0.0.739

wx_CDRSaveOldVersion

• Сохранение в старой (исходной) версии

wx.CDRSaveAsVersion — надо назначить на Ctrl-S или на кнопку в тулбаре и пользоваться для сохранения только этим макросом. Можно вызвать настройку версии сохранения — включите индикатор ScrollLock на клавиатуре и запустите макрос. После настройки - выключите ScrollLock, чтобы не не появлялось окно настройки.
wx.CDRSaveSetup — Если надо чтобы все доки сохранялись в одной фиксированной версии, то укажите номер версии - он и будет использоваться. Если ввести там 0 то сохранять будет в первоначальной версии документа.

wx_stripViews

• Автоочистка списка видов (ViewStyles) при сохранении/открывании

Установка макросов VBA в CorelDRAW

1. Запустить установщик макроса (из CorelDRAW предварительно выйти)
2. сделать кнопку для макроса:

[ Демо-ролик 80 сек 0.5MБ флешка "Создание кнопок" ]
[ создание кнопочки для макроса, пошагово в картинках ]
[ Макро Инсталлер ]

Вкратце:

в меню Tools->options->customization->commands, выбрать "macros"
(Сервис/Инструменты -> Опции -> Схемы/изготовление -> Команды -> Макросы)
перетащить выбранный макрос в тулбар (панель с кнопками на экране
там же можно назначить клавишу быстрого запуска.

Макросы: блог обновлений wOxxOm зеркало HotLinkFiles Санчо MacroMonster IsoCalc CoolTools OberonPlace AntiPoetics QuickChange