Как мога да съхраня форма в променлива?

Следният макрос на Visio (с помощта на VBA) завърта текущо избраната форма:

ActiveWindow.Selection.Rotate90

Как мога да съхраня тази форма в променлива? Опитах кода по-долу.

Dim s1 as Shape
Let s1 = ActiveWindow.Selection
s1.Rotate90

Този код не се компилира, дава ми грешка „аргументът не е задължителен“ при „Избор“.

Ако го променя на Selection(0), получавам грешка по време на изпълнение „Невалиден идентификатор за избор“.

Ако опитам Selection(1), получавам вместо това „Обектна променлива или С блокова променлива не е зададена“, което предполагам е начинът на VBA да се оплаче, че има само един обект в селекцията.


person redtuna    schedule 16.09.2009    source източник


Отговори (1)


Трябва да използвате Set вместо Let тук.

person Beatles1692    schedule 16.09.2009
comment
наистина, това го оправи! Благодаря! - person redtuna; 16.09.2009