Форум пользователей Visio http://visio.getbb.ru/ |
|
Копирование свойств (на VBA) http://visio.getbb.ru/viewtopic.php?f=15&t=1047 |
Страница 1 из 1 |
Автор: | Shishok [ 10 ноя 2016, 12:30 ] |
Заголовок сообщения: | Копирование свойств (на VBA) |
Сделал "библиотеку" процедур на VBA для копирования свойств. Разных. В файле (CopyProperties.vss), помимо основного модуля есть также 3 модуля с примерами. Если скопировать нужные процедуры себе в документ, то все нормально будет работать. А если нужно использовать код не копируя в свой документ, то необходимо подключать трафарет через VBE > Tools >References. Собственно, не нужно даже открывать вручную из Visio этот трафарет, а просто подключить и все. Вот описание из файла: Код: ' Список основных процедур: ' ШЕЙПЫ: ---------------------------------------------------------------------- ' RunCopyPropSelectedShapes ' Копирование пользовательских свойств с выделением шейпов. Именованные строки. ' RunCopyPropSelectedShapesNotName ' Копирование пользовательских свойств с выделением шейпов. Неименованные строки. ' RunCopyPropSelectedShapesExt ' Копирование штатных свойств с выделением шейпов. ' RunCopyPropShapesID ' Копирование пользовательских свойств без выделения шейпов. Именованные строки. ' Возможно копирование из шейпа/субшейпа в шейпы/субшейпы. ' RunCopyPropShapesIDNotName ' Копирование пользовательских свойств без выделения шейпов. Неименованные строки. ' Возможно копирование из шейпа/субшейпа в шейпы/субшейпы. ' RunCopyPropShapesIDExt ' Копирование штатных свойств без выделения шейпов. ' Возможно копирование из шейпа/субшейпа в шейпы/субшейпы. ' СТРАНИЦЫ: ------------------------------------------------------------------- ' RunCopyPropPages ' Копирование пользовательских свойств страницы. Именованные строки. ' Возможно копирование из страницы в страницы другого документа. ' RunCopyPropPagesNotName ' Копирование пользовательских свойств страницы. Неименованные строки. ' Возможно копирование из страницы в страницы другого документа. ' RunCopyPropPagesExt ' Копирование штатных свойств страницы. ' Возможно копирование из страницы в страницы другого документа. ' ДОКУМЕНТЫ: ------------------------------------------------------------------ ' RunCopyPropDocs ' Копирование пользовательских свойств документа в другой документ/документы. Именованные строки. ' RunCopyPropDocsNotName ' Копирование пользовательских свойств документа в другой документ/документы. Неименованные строки. ' RunCopyPropDocsExt ' Копирование штатных свойств документа в другой документ/документы. '------------------------------------------------------------------------------------------------------------ Скачать - CopyProperties.zip https://yadi.sk/d/qbpj9WI9d2eqF |
Автор: | Surrogate [ 10 ноя 2016, 19:53 ] |
Заголовок сообщения: | Re: Копирование свойств (на VBA) |
Shishok писал(а): помимо основного модуля ниасилил, кто же там основной. примеры с константами особо хороши
|
Автор: | Shishok [ 10 ноя 2016, 20:00 ] |
Заголовок сообщения: | Re: Копирование свойств (на VBA) |
Основной модуль - COPY_PROPERTIES_Module. Там собственно код копирования и находится. А что не так с примерами с константами? |
Автор: | Surrogate [ 10 ноя 2016, 20:11 ] |
Заголовок сообщения: | Re: Копирование свойств (на VBA) |
Shishok писал(а): А что не так с примерами с константами? наоборот. очень наглядно, когда константы в коде присутствуют. ты их как то по хитрому вытягивал с Auto-it ?
|
Автор: | Shishok [ 10 ноя 2016, 20:21 ] |
Заголовок сообщения: | Re: Копирование свойств (на VBA) |
Ничего не вытягивал, просто скопировал из справки для Разработчика: Visio Automation Object Model Reference > Enumerations > VisRowIndices Constants Или: Visio Automation Object Model Reference > Enumerations > VisSectionIndices Constants |
Автор: | Shishok [ 10 ноя 2016, 20:31 ] |
Заголовок сообщения: | Re: Копирование свойств (на VBA) |
Есть проблема, забыл написать. Если скопировать нужные процедуры себе в документ, то все нормально будет работать. А если нужно использовать код не копируя в свой документ, то необходимо подключать трафарет через VBE > Tools >References. Собственно, не нужно даже открывать вручную из Visio этот трафарет, а просто подключить и все. Добавил информацию в пост. |
Страница 1 из 1 | Часовой пояс: UTC + 3 часа [ Летнее время ] |
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group http://www.phpbb.com/ |