Форум пользователей Visio

Форум по вопросам применения и программирования в Visio
Текущее время: 28 мар 2024, 14:22

Часовой пояс: UTC + 3 часа [ Летнее время ]


Правила форума


При размещении файлов предпочтительным является формат vsd (а не vsdx/vsdm)
Размещая ваши вложения на форуме не используйте имена файлов содержащих кириллицу, в противном случае файл будет иметь имя .<расширение файла> !

Для форматирования ваших сообщений используйте BBCodes, описание используемых на форуме BBCodes.



Начать новую тему Ответить на тему  [ Сообщений: 5 ] 
Автор Сообщение
 Заголовок сообщения: Как обработать выделение нескольких овалов?
СообщениеДобавлено: 16 фев 2016, 10:16 
Не в сети
Просто PowerCat
Аватара пользователя

Зарегистрирован: 16 фев 2016, 10:11
Сообщений: 282
Использую Visio c: 2000
Очков репутации: 2

Добавить очки репутацииУменьшить очки репутации
Привет.
Задача такая - нарисовать два кружка, выделить их и сочетанием кнопок запустить макрос, который получить координаты центров этих кружков и протянет линию по ним.

Вопрос такой - как обратиться к выделенному овалу? Получить координаты центров я могу, но не для Selection, а просто обращаясь к конкретному объекту или обходя все объекты листа.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Как обработать выделение нескольких овалов?
СообщениеДобавлено: 16 фев 2016, 10:25 
Не в сети
Просто PowerCat
Аватара пользователя

Зарегистрирован: 16 фев 2016, 10:11
Сообщений: 282
Использую Visio c: 2000
Очков репутации: 2

Добавить очки репутацииУменьшить очки репутации
Дополнение - как обратиться к Selection - понял )))

Все, задача решена.


Последний раз редактировалось powercat 16 фев 2016, 10:36, всего редактировалось 1 раз.

Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Как обработать выделение нескольких овалов?
СообщениеДобавлено: 16 фев 2016, 10:34 
Не в сети
Administrator

Зарегистрирован: 30 авг 2009, 11:02
Сообщений: 2253
Очков репутации: 100626

Добавить очки репутацииУменьшить очки репутации
После того, как нарисуете линию, ее скорее всего еще и приклеивать придется...
Я обычно рекомендую сначала посмотреть вот эту статью http://visio.artberg.ru/biblio/st005.htm
а потом уже спрашивать, если что осталось непонятным.
--------
Или Вам нужна именно линия, а не коннектор?


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Как обработать выделение нескольких овалов?
СообщениеДобавлено: 16 фев 2016, 10:37 
Не в сети
Просто PowerCat
Аватара пользователя

Зарегистрирован: 16 фев 2016, 10:11
Сообщений: 282
Использую Visio c: 2000
Очков репутации: 2

Добавить очки репутацииУменьшить очки репутации
Нет, там коннектор не нужен, просто провести линию, чтобы руками ее не копипастить - много приходится рисовать схема с линиями между кружками...


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Как обработать выделение нескольких овалов?
СообщениеДобавлено: 16 фев 2016, 11:41 
Не в сети
Content manager
Content manager
Аватара пользователя

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 5043
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Интеграция системных интеграторов
Должность: Дизайнер по оформлению документации
Уровнь квалификации: Форматирование документов MS Word
Код:
Sub ttt()
Dim px1 As Single, py1 As Single, px2 As Single, py2 As Single
' координаты центра первого овала
px1 = ActiveWindow.Selection(1).Cells("PinX")
py1 = ActiveWindow.Selection(1).Cells("PinY")
' координаты центра второго овала
px2 = ActiveWindow.Selection(2).Cells("PinX")
py2 = ActiveWindow.Selection(2).Cells("PinY")
ActivePage.DrawLine px1, py1, px2, py2
End Sub

_________________
База знаний ShapeSheet
Мой Youtube-канал @surrogate-tm
Мои трафареты


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 5 ] 

Часовой пояс: UTC + 3 часа [ Летнее время ]



Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 11


Вы можете начинать темы
Вы можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Вы можете создать форум бесплатно PHPBB3 на Getbb.Ru, Также возможно сделать готовый форум PHPBB2 на Mybb2.ru
Русская поддержка phpBB