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

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

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


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


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

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



Начать новую тему Ответить на тему  [ Сообщений: 15 ] 
Автор Сообщение
 Заголовок сообщения: Связь фигур с цифрами
СообщениеДобавлено: 05 мар 2014, 15:48 
Есть к примеру два листа,на одном расположена сетка и фигуры,на втором информация,а именно номер листа и адрес фигуры. Можно ли привязать точку к цифрам,и при изменении расположения точки,что бы менялись цифры.
Изображение
Изображение


Пожаловаться на это сообщение
Вернуться к началу
  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 05 мар 2014, 15:53 
Изображение
Изображение


Пожаловаться на это сообщение
Вернуться к началу
  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 05 мар 2014, 16:27 
кросс-пост :)
Mr_Marley писал(а):
Есть к примеру два листа,на одном расположена сетка и фигуры,на втором информация,а именно номер листа и адрес фигуры. Можно ли привязать точку к цифрам,и при изменении расположения точки,что бы менялись цифры.
http://upload.akusherstvo.ru/thumbs/612825.png
http://upload.akusherstvo.ru/thumbs/612826.png


Пожаловаться на это сообщение
Вернуться к началу
  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 05 мар 2014, 16:36 
Не в сети
Новичок

Зарегистрирован: 01 янв 2010, 05:46
Сообщений: 45
Откуда: ЕАО, Россия
Использую Visio c: 2010
Очков репутации: 1

Добавить очки репутацииУменьшить очки репутации
макросом теоретически возможно


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: 05 мар 2014, 16:40 
Не в сети
Ветеран

Зарегистрирован: 06 май 2013, 13:01
Сообщений: 746
Откуда: Россия
Использую Visio c: 2013
Очков репутации: 18

Добавить очки репутацииУменьшить очки репутации
Chesh писал(а):
Можно ли привязать точку к цифрам,и при изменении расположения точки,что бы менялись цифры.

Да. В ShapeSheet'е прописать соответствующую формулу.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re:
СообщениеДобавлено: 05 мар 2014, 16:48 
Не в сети
Content manager
Content manager
Аватара пользователя

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 5043
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Интеграция системных интеграторов
Должность: Дизайнер по оформлению документации
Уровнь квалификации: Форматирование документов MS Word
Qwertiy писал(а):
Да. В ShapeSheet'е прописать соответствующую формулу.

В для существующих фигур это правильно, можно написать формулу типа Pages[Page-1]!Sheet.3!PinX. а если фигуры еще нет на листе, то это уже гемморой

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


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 05 мар 2014, 16:50 
Я так понимаю,нужно уметь программировать?Подскажите,на сколько сложно в освоении написании макросов,если вообще программировать не умеешь,если это вообще возможно.


Пожаловаться на это сообщение
Вернуться к началу
  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 05 мар 2014, 16:56 
С листом ещё более менее понятно,а как сделать ,что бы лист был разбит на зоны от 0-9(которые вверху)


Пожаловаться на это сообщение
Вернуться к началу
  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 05 мар 2014, 17:03 
Не в сети
Content manager
Content manager
Аватара пользователя

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 5043
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Интеграция системных интеграторов
Должность: Дизайнер по оформлению документации
Уровнь квалификации: Форматирование документов MS Word
а что нужно координаты фигуры в мм или в каком квадрате она находится ?

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


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 05 мар 2014, 17:23 
Суть такая,это для создания электросхем,есть стандартная рамка,сверху зоны 0-9,на ней рисуем агрегаты. Каждый агрегат подключается допустим к клеммной колодке X1 к клеммам 1,2,3
На второй странице расписано что за агрегат и к какой клемме подключён,сверху расположены адреса этих клемм(лист и зона)Приходится часто перетаскивать агрегаты и точки изменяют свои позиции по зоне,а то и по листу,и приходится очень часто перелапачивать вторую страницу меняя адреса клемм и листов. Тратится порой очень много времени...
Изображение
Изображение


Пожаловаться на это сообщение
Вернуться к началу
  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 05 мар 2014, 22:12 
Не в сети
Ветеран

Зарегистрирован: 05 июл 2012, 21:34
Сообщений: 225
Очков репутации: 27

Добавить очки репутацииУменьшить очки репутации
Имели дело с shapesheet? Попробуйте прописать формулу одновременно включив запись макросов. Потом посмотрите код макроса.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 06 мар 2014, 07:24 
Не в сети
Ветеран

Зарегистрирован: 21 окт 2011, 12:01
Сообщений: 939
Откуда: г. Екатеринбург
Использую Visio c: 2011
Очков репутации: 127

Добавить очки репутацииУменьшить очки репутации
да, проще макросами. надо брать с шейпа PinX, PinY и пересчитывать в новые координаты. это довольно просто.
для оси Х это будет PinX / "ширина зоны".
для оси Y нужно сначала создать массив соответствий: arr=Array("F","E","D", ...). обратный порядок, потому что направление реальной оси обратное. тогда для оси Y координата будет считаться так: arr(PinY / "ширина зоны")
если используются группы, то координаты надо сначала привести к страничным через ф-ю XYToPage.
Содержимое спрятано под спойлер ↓
Спойлер:

к сожалению у меня нет времени написать рабочий код. автору все равно придется разобраться с азами.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 06 мар 2014, 10:32 
Не в сети
Content manager
Content manager
Аватара пользователя

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 5043
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Интеграция системных интеграторов
Должность: Дизайнер по оформлению документации
Уровнь квалификации: Форматирование документов MS Word
во вложенном файле на втором листе есть аналог таблицы. я ее сгенерил кодом
Код:
Sub CreateTable()
Dim rw As Integer, cl As Integer, sh As Shape, shn As String
For rw = 1 To 2
For cl = 1 To 15
ActivePage.DrawRectangle cl, rw, cl + 1, rw + 1
Set sh = ActiveWindow.Selection(1)
If rw = 1 Then shn = "y" & cl
If rw = 2 Then shn = "x" & cl
sh.Name = shn
Next cl
Next rw
End Sub
добавляем код, который будет при добавлении новый фигур на листе 1 прописывать формулы для соответствующих номеров шейпов. если дальше двигать фигуры их координаты в таблице будут меняться :)
Код:
Option Explicit
Dim WithEvents app As Visio.Application
Private Sub Document_DocumentOpened(ByVal Doc As IVDocument)
Set app = Application
End Sub
Private Sub Document_ShapeAdded(ByVal Shape As IVShape)
Dim vsoCharacters2 As Characters
Dim n As Integer
Dim xn As String, yn As String, px As String, py As String, shp As Shape
Dim pg As Page
Set pg = ActiveDocument.Pages(2)
n = Shape.ID
xn = "x" & n
yn = "y" & n
px = "Pages[Page-1]!Sheet." & n & "!PinX"
py = "Pages[Page-1]!Sheet." & n & "!Piny"
Set shp = pg.Shapes.Item(xn)
Set vsoCharacters2 = shp.Characters
    vsoCharacters2.Begin = 0
    vsoCharacters2.End = 1
    vsoCharacters2.AddCustomFieldU px, visFmtNumGenNoUnits
Set shp = pg.Shapes.Item(yn)
Set vsoCharacters2 = shp.Characters
    vsoCharacters2.Begin = 0
    vsoCharacters2.End = 1
    vsoCharacters2.AddCustomFieldU py, visFmtNumGenNoUnits
End Sub


Вложения:
fill_table.vsd [44.5 Кб]
Скачиваний: 139

_________________
База знаний ShapeSheet
Мой Youtube-канал @surrogate-tm
Мои трафареты
Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 06 мар 2014, 16:00 
Да-да,примерно то,что надо,спасибо за информацию,подскажите литературку которую почитать,пошерстил инет,тяжело на чём то остановиться...


Пожаловаться на это сообщение
Вернуться к началу
  
Ответить с цитатой  
 Заголовок сообщения: Re: Связь фигур с цифрами
СообщениеДобавлено: 06 мар 2014, 16:33 
Не в сети
Content manager
Content manager
Аватара пользователя

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 5043
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Интеграция системных интеграторов
Должность: Дизайнер по оформлению документации
Уровнь квалификации: Форматирование документов MS Word
у нас есть раздел Программирование. Полезные ссылки
Но там не густо, с литературой вообще по этому вопросу не богато. Есть достаточное количество книг по программированию VBA для Excel, Visio не такой популярный продукт Изображение
Так что только по форумам можно искать инфо здесь и у VisioGuy (если с английским нет проблем)

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


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

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



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

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


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

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