Как заставить макросы работать, если нет VBA-редактора?

rrenard / 24.03.2011, 08:15/00:41
Форум: 
Макросы и скрипты

Откомпилировать, сконвертировать в сценарий или еще как-нибудь?

Подробно: есть Корел 13, лицензионный, для образовательных учреждений - и потому урезанный в некоторых возможностях. Есть VBA-код. И есть предположение, что у корела имеется средство, аналогичное фотошоповскому droplet...

Интересно решить проблему "в общем виде", не для конкретного кода. Подскажите, куда копать?

Sancho / 24.03.2011, 09:43

Если в Кореле не установлен VBA, макросы не будут работать. Можно попробовать написать аналогичный код только на С++ и скомпилировать в плагин, но не уверен что будет работать, хотя теоретически должно :)

Anderos64 / 25.03.2011, 13:34

Вопрос рядом с темой.
На новую машину установили свежий лицензионный софт. Семерка и Х5. Старый рабочий макрос на Х3, написанный по крупинкам перестал понимать некоторые команды. ScrollScreen к примеру.
Видимо не хватает какой то библиотеки. Подскажите как обучить машину.

Sancho / 25.03.2011, 14:04

Anderos64, нужно переписать макрос. Дело не в библиотеках (при условии что ВБА стоит), а в объектной модели, которая имеет свойства незначительно меняться из версии в версию.

Anderos64 / 25.03.2011, 14:48

Да макрос в принципе работает. Только некоторые команды потерялись. Поправлю конечно. ScrollScreen чем заменить к примеру?

Sancho / 25.03.2011, 15:03

А что она делал то, куда и зачем она экран прокручивала? Я просто не помню такой команды.

Anderos64 / 25.03.2011, 15:22

Она сдвигала рабочий стол влево.

Sancho / 25.03.2011, 15:33

ActiveDocument.ActiveWindow.ActiveView. а тут любую подходящую функцию на выбор, например SetViewArea, всё зависит от конкретной надобности.

Anderos64 / 25.03.2011, 15:54

Этот показывает какую-то часть документа. А мне надо документ сдвинуть влево до упора, т.к. справа открыто окно макроса. Как, пока не могу найти. Если подскажите, буду благодарен.

Sancho / 25.03.2011, 16:08

Если честно то до конца не понятно всё же что вы там двигать хотите и до какого упора. SetViewArea позволяет установить любую координату и зум для просмотра. Возможно просто нужно поменять значения Х и У. У ActiveView не так уж и много свойств/функция что бы заблудиться. Читайте их описания и делайте.

Anderos64 / 25.03.2011, 17:40

Спасибо за направление мысли. Получилось через

ActiveDocument.ActiveWindow.ActiveView.ToFitArea

Страницы