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

Форум по вопросам применения и программирования в Visio
Текущее время: 17 авг 2017, 11:48

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




Начать новую тему Ответить на тему  [ Сообщений: 2 ] 
Автор Сообщение
 Заголовок сообщения: Структура приложения
СообщениеДобавлено: 13 апр 2013, 23:43 
Не в сети
Administrator

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3362
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Связь
Должность: Бывший проектировщик
Уровнь квалификации: ShapeSheet, VBA
Тему было предложено создать мне, значит и мне придется первому излагать свои соображения по реализации

1. Имеем таблицу с конфигурацией щитов, в таблице две вкладки
Block (в них описываются щиты) и Calсulation (в ней описаны все группы потребителей)
2. двумя циклами считываем данные с обоих листов и заносим в двумерные массивы shit и group
3. Далее другой открывает первую строку массива shit, роняем на лист мастер All-in-one и передаем в него данные из первой строки массива
4. Далее идем в массив group и считываем с него строки, ведем счет текущей строки. для каждой строки роняем на лист фигуру Тип6 и заполняем ее shapedata данными из массива group
Цитата:
Do

Loop while group(x,13) <> "" {значение в ячейке U, для данной строки не пустая строка}
5. далее создается новый лист
и на нем повторяется тоже, что и на первом листе. и так по всем строкам вкладки Block


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Структура приложения
СообщениеДобавлено: 19 апр 2013, 10:19 
Не в сети
Administrator

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3362
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Связь
Должность: Бывший проектировщик
Уровнь квалификации: ShapeSheet, VBA
добавил немного мясца к скелету :)
распакуйте куда-нибудь архив. в файле визио запустите макрос ololo(). Он там единственный.
Авторские комментарии:
    1. Автопозиционирование реализовано в shapesheet.
    2. считывание данных ведется в два массива, а не в коллекции.
    3. На основании данных собранных в массив shit создается нужное число страниц.
    4. По данным из массива gr на каждом листе добавляется нужное количество групп (условие выхода из цикла заполенения групп в щите - если значение ячейки в столбце Q (Breaker_3ph) не равно пустой строке) .
    5. число полей отражающихся на схеме сделал минимальным…
    6. заполнение текста дочерних шейпах группового шейпа из мастера All-in-one, сделал пока по-простому sheet.N!Prop.N. где N - номер шейпа из мастера All-in-one
Вложение:
Комментарий к файлу: примитивные наброски
visio_getbb.zip [33.66 Кб]
Скачиваний: 193


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

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



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

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


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

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