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

ukreni

Ukraine
35 Posts
Posted - 03/18/2009 :  09:33:02
Как получить шейп, выделенный в группе (мышкой :)).
set sh = ActiveWindow.Selection(1) не проходит

ukreni

Ukraine
35 Posts
Posted - 03/18/2009 :  10:03:10
и по этому же вопросу ...
я получил шейп - (set sh = ActivePage.Shapes(1).Shapes(3)) - как мне его "подсветить" (выделить) на странице?
Go to Top of Page

ukreni

Ukraine
35 Posts
Posted - 03/18/2009 :  14:55:44
со вторым вопросом разобрался ...
ActiveWindow.Select sh, visSubSelect
а вот с первым никак
Go to Top of Page

Tumanov

Russia
1198 Posts
Posted - 03/18/2009 :  17:09:34
Надо переключить IterationMode у Selection.
Например, IterationMode = visSelModeOnlySub будет подсвечивать только шейпы, входящие в группу.
Примерно так
Dim sel As Visio.Selection
Set sel = ActiveWindow.Selection
sel.IterationMode = visSelModeOnlySub
Debug.Print sel(1).NameID
Go to Top of Page

ukreni

Ukraine
35 Posts
Posted - 03/19/2009 :  06:06:58
Большое спасибо за ответ, именно оно .
Go to Top of Page

GDK

Russia
90 Posts
Posted - 10/19/2009 :  11:31:31
И ещё одно спасибо.
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)