All Forums
 Категория Visio
 Форум Вопросы и ответы
 Объединение шейпов
Author Previous Topic Topic Next Topic  

Tatyana

Russia
19 Posts

Posted - 02/05/2004 :  13:44:32
Подскажите!
Мне нужно объединить два шейпа и обращаться потом к объединенному шейпу.
Я пробую таким образом:
ActiveWindow.Select shpRect, visSelect
ActiveWindow.Select shpOvBot, visSelect
Dim selUnObj As Visio.Selection
Dim shpUn As Visio.Shape
Set selUnObj= ActiveWindow.Selection
selUnObj.Union
Как теперь это объединение присвоить шейпу shpUn?
Или все надо делать как-то иначе? Мне нужны свойства этого объединения.
Спасибо.
  Previous Topic Topic Next Topic  
Данный сайт является архивом форума visio.artberg.ru, который был закрыт в связи с переходом на новую платформу visio.getbb.ru
Все материалы доступны только для чтения! Если у вас появились вопросы, или вы хотите что-то обсудить, связанное с Visio, обращайтесь на новый форум!
Архив был создан благодаря совместным усилиям Генадия Туманова @Tumanov (visio.artberg.ru), Александра ака @Surrogate (visio.getbb.ru), и Николая Белых @nbelyh (unmanagedvisio.com)