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

Tatyana

Russia
19 Posts
Posted - 01/19/2004 :  09:02:09
Здравствуйте! Как можно из макроса обратиться к текущему (активному) шейпу?

Digitall

Russia
389 Posts
Posted - 01/19/2004 :  10:36:01  Visit Digitall's Homepage
quote:
Originally posted by Tatyana

Здравствуйте! Как можно из макроса обратиться к текущему (активному) шейпу?

Например так.
Dim shpObj As Visio.Shape
Dim selectObj As Visio.Selection
Set selectObj = ActiveWindow.Selection
Set shpObj = ActiveWindow.Selection.Item(1)
Go to Top of Page

Tatyana

Russia
19 Posts
Posted - 01/19/2004 :  12:15:35
quote:
Originally posted by Digitall

quote:
Originally posted by Tatyana

Здравствуйте! Как можно из макроса обратиться к текущему (активному) шейпу?

Например так.
Dim shpObj As Visio.Shape
Dim selectObj As Visio.Selection
Set selectObj = ActiveWindow.Selection
Set shpObj = ActiveWindow.Selection.Item(1)

Спасибо за помощь! Все получилось.
Go to Top of Page
  Previous Topic Topic Next Topic  
Данный сайт является архивом форума visio.artberg.ru, который был закрыт в связи с переходом на новую платформу visio.getbb.ru
Все материалы доступны только для чтения! Если у вас появились вопросы, или вы хотите что-то обсудить, связанное с Visio, обращайтесь на новый форум!
Архив был создан благодаря совместным усилиям Генадия Туманова @Tumanov (visio.artberg.ru), Александра ака @Surrogate (visio.getbb.ru), и Николая Белых @nbelyh (unmanagedvisio.com)