Результаты поиска

Подскажите, как с помощью VBA взять с помощью пипетки эталонный цвет с растровой картинки вставленной в документ? причем я хочу указать координаты точки на картинки... Будет серия замеров. через определенное расстояние и из каждой точке мне нужен цвет... Спасибо!!!

огромное спасибо

Спрошу здесь чтоб тему не создавать... С помощью макроса хочу создать фигуру, на панельку выношу кнопку. Выдает ошибку, если никакого документа не открыто. Как сделать проверку: если рабочего листа нету, то создать документ?

@TRANTOR, огромное спасибо. Попробовать хочу inno setup

наверное проще просто создать sfx архив

а не для корловских? встречал же инсталяторы, которые например к программа дополнения устанавливают (шрифт например в папку Fonts) ...

Вы так много написали, но по существу ответили только на 2й вопрос... Ладно, упрощу свой вопрос: есть специальные программы для создания инсталляторов?

Написал макрос, теперь его нужно установить на десяток компов, с разной ОС, с разными версиями корела... 1) Можно ли создать инсталлятор, который нашел бы нужную папку (Например у меня XP, 7ка, 8ка 64битные - значит надо файл помсетить в C:\Program Files\Corel\CorelDRAW\Draw\GMS... а если 7ка...

Все же в моем макросе есть основа... Вставляем кучу картинок и выставляем для них заданные размеры - 3на4, соответственно разрешение у них становится например 1200*1200пикселей. Берем и растрируем каждую из нис с нужным разрешением 300dpi

У меня есть такой макрос - он из папки затаскивает файлы, масштабирует их ширину до размера 4 см (высота пропорциональна вычисляется)... + поворачивает произвольно + подложка белая + тень... Типо коллажа Sub kollaj() Dim s() As Shape, p() As Shape, gr() As Shape Dim i As Integer Dim path...

Третья ссылка рулит. Спасибо, но уже поздно

вдруг кому пригодится, написал весь код макроса в своем блоге

УРАААА! ЗарЯботало!!! Огромное спасибо!!!

Помоги тогда, как мне после For Each pg In ActiveDocument.Pages pg.Activate активную страницу экспортировать?

вот ошибку выдает:

Dim expJPGfiltr As ExportFilter Что-то на этом месте стопорится Set expJPGfiltr... Видимо он не может в одну переменную создать много объектов экспорта...

надо еще в имя вставлять текущую переменную... чтоб имена были разные... мне кажется что проще так: for i = 1 to ???? Set expJPGfiltr = ActiveDocument.ExportBitmap(exp_jpg + i+".jpg", cdrJPEG, СТРАНИЦУ i

Нужно сделать макрос, чтоб он с заданными параметрами делал экспорт страницы в jpg exp_jpg= это путь с именем файла Для текущей странице сделал так и работает: Set expJPGfiltr = ActiveDocument.ExportBitmap(exp_jpg + ".jpg", cdrJPEG, cdrCurrentPage, _ opt.ImageType, , , opt.ResolutionX...

Прошу выложить стандартную CMYK цветовую панель Она вроде находится в папке C:\Program Files\Corel\CorelDRAW\Languages\RU\Custom Data\coreldrw.cpl

Давайте познакомимся. Я более двух лет, в газете, на работе пользовался этой программой версии 10. Конечно после ФШ было непривычно, но функционал весь имеется. Зря вы так