Следуйте инструкциям в видео ниже, чтобы узнать, как установить наш сайт как веб-приложение на главный экран вашего устройства.
Примечание: Эта функция может быть недоступна в некоторых браузерах.
Вы используете устаревший браузер. Этот и другие сайты могут отображаться в нем неправильно. Необходимо обновить браузер или попробовать использовать другой.
Ответ: Макрос: Конверт оле объектов (вопрос по перемещению объектов)
Sub convertOLEtoShape()
Dim s As Shape, t As Shape, r As New ShapeRange, l As Layer, c As Long
dim x#,y#
Set r = ActiveSelectionRange: Set l = ActiveLayer: c = 0
For Each s In r
If s.Type =...
Ответ: SP2 - фантомный аутлайн
было время, исправил, вот
Sub SP2FixScaledOutline()
Dim p As Page, cnt&, numPages&, cnt0&, s$, res As New ShapeRange, oldP As Page, o As New Outline
If ActiveDocument Is Nothing Then Exit Sub
On Error Resume Next...
Ответ: SP2 - фантомный аутлайн
может поможет такой вот макрос - запускается сам если выключить DelayLoadVBA - при открытии доков *должен* снимать атрибут Scale с объектов без обводки
сам не тестировал, простите
Ответ: как задать размер нескольким объектам
макрос ForEach в zzOsman должен быть или вот:
Sub ForEach()
Dim sr As ShapeRange, s As Shape, stat As AppStatus
Set sr = ActiveSelectionRange: cnt = sr.Count: i = 1
Optimization = True
EventsEnabled = False...
Ответ: Работа с Fountain из макроса под ХЗ
ээ, что за куски :-) ?
у меня сейчас вот так и все работает:
Sub ConvertShapesToCMYK()
Dim total&, changed&: total = 0: changed = 0
Dim p As Page, oldP As Page, shapes As New ShapeRange
Set shapes = ActiveSelectionRange: Set oldP =...
часто делаю split (разделение) для бленд, состоящих из кучи точечек (как в растре), ну вот бывает поймаешь место где надо немного подвигать, и нужно, следовательно, разделить бленду, а значит, глаза побежали в тулбар искать мелкую блендовую менюшку, в ней кнопку "split", а место уже потерял...
Ответ: VBA: Не работает команда Shell
Кстати я смутно вспоминаю, что надо добавлять именно свой макрос в доверенные макросы, а не только CorelDraw.exe в приложения
Ответ: Можно ли подменить PhotoPaint PhotoShop-ом
предлагю не углублять оффтопик! все равно не убедительно, особенно если 10 лет работаешь c photoshop :-)
Ответ: Как запомнить наложенную на Shape прозрачность
1. пощадите чувства Lev - в ВБА пишутся макросы а не скрипты
2. способа копировать сложные прозрачности и другие усложненные настройками эффекты через ВБА , к сожалению, не существует. Имеющийся остаток в виде CorelScript.CopyEffectsFrom не...
Ответ: Не работает команда Shell
Kav и др.антивирусы в том числе и возможно фаерволы могут блокировать ActiveX доступ из макросов, в частности доступ к WinAPI через который видимо и осуществляется вызов команды Shell. Надо в настройках антивируса добавить доверенное приложение - CorelDraw...
На данном сайте используются cookie-файлы, чтобы персонализировать контент и сохранить Ваш вход в систему, если Вы зарегистрируетесь.
Продолжая использовать этот сайт, Вы соглашаетесь на использование наших cookie-файлов.