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

Форум по вопросам применения и программирования в Visio
Текущее время: 24 июн 2017, 09:13

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


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


Размещение файлов в формате vsd (а не vsdx/vsdm), увеличивает вероятность ответа стремительным домкратом !!!

Для корректного отображения названий вложенных файлов название должно быть написано латиницей!



Начать новую тему Ответить на тему  [ Сообщений: 50 ]  На страницу Пред.  1, 2, 3  След.
Автор Сообщение
 Заголовок сообщения: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 16 сен 2015, 13:23 
Не в сети
Постоянный участник

Зарегистрирован: 19 июн 2015, 22:18
Сообщений: 67
Использую Visio c: 2013
Очков репутации: 18

Добавить очки репутацииУменьшить очки репутации
Кидаю новый трафарет рамки с применением макросов.
В отличии от версии 3 здесь есть возможность изменять сам шаблон, менять шрифты, переносить строки, да и сам он намного удобнее и нагляднее.
Подробное описание в прилагаемом файле.

Жду ваших комментариев.
Отсутствуют заимствования из трафарета оформление документации по ГОСТ 21.101-97 от Surrogate™!!!


Новая версия 4.2 - Исправлены ошибки.
1) При помещении Настроек документа на не пустую страницу, при закрытии окна вылетала ошибка.
2) Шаблона документа не менял в форме 3 список фамилий.

Полностью изменил описание.


Вложения:
Комментарий к файлу: Описание шаблона
Opisanie_v4_2.rar [807.85 Кб]
Скачиваний: 2145
Комментарий к файлу: ГОСТ Р 21.1101-2013 v4_2.vss
Ramka_v4_2.rar [251.3 Кб]
Скачиваний: 3442


Последний раз редактировалось vin 01 фев 2016, 10:12, всего редактировалось 4 раз(а).
Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 18 окт 2015, 21:07 
Не в сети
Ветеран

Зарегистрирован: 30 июл 2014, 14:28
Сообщений: 411
Использую Visio c: 2008
Очков репутации: 87

Добавить очки репутацииУменьшить очки репутации
Код:
' Переписываем формулы, указывающие на фонт, его размер и стиль
' Таким образом мы убираем наследование формул от мастера
' И только так работает обновление шрифтов (протестировано мною)
Public Function DropRamka(vsoShape As Visio.Shape)
     Dim Shp As Shape
     Dim TmpFormula As String, NmCell As Variant
     Dim ArCellName
     
     ' устанавливаем в шаблоне документа даты-константы, вместо формулы Now
     SetupDocDate vsoShape
     Exit Function
     
     ArCellName = Array("Char.Font", "Char.Size", "Char.Style")
     For Each Shp In vsoShape.Shapes
        'Debug.Print Shp.Name
        If (Shp.Shapes.Count > 0) Then
            DropRamka Shp
        End If
       
        For Each NmCell In ArCellName
            If (Not Shp.Cells(NmCell).IsConstant) Then
                'Debug.Print NmCell & "  " & Shp.Name
                TmpFormula = Shp.Cells(NmCell).Formula
                Shp.Cells(NmCell).FormulaForce = ""
                Shp.Cells(NmCell).FormulaForce = TmpFormula
            End If
        Next
     Next
     
     SetupDocDate vsoShape
End Function

В этой функции есть строка Exit Function. Следующий после нее код никогда не выполняется. Тогда зачем он? Или я чего-то не понял. :?:


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 19 окт 2015, 01:15 
Не в сети
Administrator

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3330
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Связь
Должность: Бывший проектировщик
Уровнь квалификации: ShapeSheet, VBA
Уважаемый vin в последнее время редко заглядывает, попробую ответить сам
Алексей писал(а):
можно ли все надписи в трафарете (см. вложение) прописать на украинском языке
конечно можно, для этого
1. открыть ГОСТ Р 21.1101-2013 v4.vss файл в режиме редактирования.
2. дважды кликнуть по мастеру "Рамка", попадешь в внутрь группы
3. используя замену текста заменить русскоязычные надписи на те, что нужно
Алексей писал(а):
убрать один элемент без потери функциональности трафарета
по ходу невозможно угодить всем :)
в моем трафарете эта надпись скрывается автоматически, на втором и последующих листах.
у vin сделано по другому, с помощью окна свойств "Левая панель" - включена/отключена. Но отключается все боковые надписи.
поправить тоже можно:
влезть в внутрь мастера
1. выделить рамку, войти внутрь ее группы
2. Выделить боковую надпись LeftBox, войти внутрь ее группы
3. открыть выделить фигуру, открыть ее shapesheet
4. в секциях Geometry начиная с 13 по 27 в полях Geometry13.NoLine - Geometry27.NoLine поставить 1

не знаю, понял ли ты что-то в этой тарабарщине ?


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 19 окт 2015, 12:00 
Не в сети
Постоянный участник
Аватара пользователя

Зарегистрирован: 12 май 2012, 15:16
Сообщений: 89
Очков репутации: 10

Добавить очки репутацииУменьшить очки репутации
Shishok писал(а):
Слово "заказЩик" в нескольких местах с ошибкой. :
в самом трафарете это слово не встречается, если пользователи Grammar Nazi, то напишут правильно.
Surrogate писал(а):
не знаю, понял ли ты что-то в этой тарабарщине ?
тут четкого ответа, не зная версии визио задавшего вопрос трудно дать.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 19 окт 2015, 15:23 
Не в сети

Зарегистрирован: 18 окт 2015, 17:01
Сообщений: 9
Использую Visio c: 2015
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Surrogate писал(а):
не знаю, понял ли ты что-то в этой тарабарщине ?
Спасибо с языком разобрался :)
Не могу найти секцию Geometry
Спойлер: показать
Вложение:
.png
.png [ 53.93 Кб | Просмотров: 3022 ]


В главной рамке есть такой пункт, а вот в лефтбокс нету.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 19 окт 2015, 15:36 
Не в сети
Administrator

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3330
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Связь
Должность: Бывший проектировщик
Уровнь квалификации: ShapeSheet, VBA
Алексей писал(а):
Не могу найти секцию Geometry
ты просто не выделил сам шейп с рамкой (sheet.39) мышью внутри группы LeftBox
самое верное средство использовать DrawingExplorer Window
Изображение
Алексей, если ты у тебя это окно DrawingExplorer Window активировано ?
Кстати у Sheet.38 - надписи Согласовано, тоже надо бы поставить 1 поле HideText.
Shishok в сообщении #6657 писал(а):
есть ведь чудесная ячейка для скрытия текста. Секция - Miscellaneous, ячейка - HideText.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 19 окт 2015, 21:18 
Не в сети

Зарегистрирован: 18 окт 2015, 17:01
Сообщений: 9
Использую Visio c: 2015
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Surrogate писал(а):
Алексей писал(а):
Не могу найти секцию Geometry
ты просто не выделил сам шейп с рамкой (sheet.39) мышью внутри группы LeftBox
самое верное средство использовать DrawingExplorer Window
Изображение
Алексей, если ты у тебя это окно DrawingExplorer Window активировано ?
Кстати у Sheet.38 - надписи Согласовано, тоже надо бы поставить 1 поле HideText.
Shishok в сообщении #6657 писал(а):
есть ведь чудесная ячейка для скрытия текста. Секция - Miscellaneous, ячейка - HideText.


Сделал все как написали, вот такая "писюлька" осталась, как её обрезать? :D

Вложение:
 21.1101-2013 v4.vssНабор элементовРамка - Microsoft Visio.jpg
21.1101-2013 v4.vssНабор элементовРамка - Microsoft Visio.jpg [ 177.34 Кб | Просмотров: 3070 ]


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 19 окт 2015, 21:26 
Не в сети

Зарегистрирован: 18 окт 2015, 17:01
Сообщений: 9
Использую Visio c: 2015
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Все, не актуально, "писюлька" ампутирована, оказывается она на Geometry12.NoLine держалась.
Спасибо за помощь! ;)
Еще один вопрос, как текстовый блок передвинуть? Линии и текст я уже понял как убирать, а вот с таким еще не разобрался, пробовал с этим играться но ничего не получилось.
Вложение:
Microsoft Visio.jpg
Microsoft Visio.jpg [ 133.64 Кб | Просмотров: 3039 ]


Вот так надо расширить текстовый блок:
Вложение:
Microsoft Visio.jpg
Microsoft Visio.jpg [ 247.87 Кб | Просмотров: 3068 ]


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 20 окт 2015, 11:52 
Не в сети
Administrator

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3330
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Связь
Должность: Бывший проектировщик
Уровнь квалификации: ShapeSheet, VBA
Алексей писал(а):
Еще один вопрос, как текстовый блок передвинуть?
Алексей писал(а):
Вот так надо расширить текстовый блок:
передвинуть и расширить это две разные разницы!
за передвинуть надо поиграться с PinX, LocPinX. Длина шейпа остается прежней
PinX
Sheet.81!Width*0
LocPinX
Width*0
за передвинуть и удлинить надо поиграться с PinX, LocPinX, Width
Width
Guard(Sheet.81!Width*175/185)
PinX
Sheet.81!Width*0
LocPinX
Width*0


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 05 ноя 2015, 16:56 
Не в сети

Зарегистрирован: 06 ноя 2015, 11:32
Сообщений: 5
Использую Visio c: 2015
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Здравствуйте!
Немного оффтопа: а можно попросить вас сделать макрос другой рамки по ГОСТу?
За умеренное вознаграждение :?
Ну или рассказать каким способом это можно сделать))


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 05 ноя 2015, 17:20 
Не в сети
Постоянный участник
Аватара пользователя

Зарегистрирован: 12 май 2012, 15:16
Сообщений: 89
Очков репутации: 10

Добавить очки репутацииУменьшить очки репутации
Мария
было бы не плохо раскрыть тему подробнее:

1. к какой рамке ? (выложите образец)
2. что должен делать макрос ?
и самое интересное:
3. каков размер вознаграждения

ну а если хотите сделать что-то сами - помучайте Surrogate™ вопросами


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 05 ноя 2015, 19:35 
Не в сети
Administrator

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

Добавить очки репутацииУменьшить очки репутации
Если учиться, то начинать нужно со статьи Ничкова - http://visio.artberg.ru/biblio/st011.htm


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 06 ноя 2015, 09:21 
Не в сети

Зарегистрирован: 06 ноя 2015, 11:32
Сообщений: 5
Использую Visio c: 2015
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Здравствуйте!
Я не уверена насколько именно необходимо исполнение его с помощью макросов, но мне очень понравился приведенный здесь блок рамка+штамп с возможностью заполнения.
Штамп для схем согласно национальному стандарту Российской Федерации ГОСТ Р 56303-2014 «Единая энергетическая система и изолированно работающие энергосистемы. Оперативно-диспетчерское управление. Нормальные схемы электрических соединений объектов электроэнергетики. Общие требования к графическому исполнению».
По идее всю эту работу должны делать собственники предприятий, предоставляющих схемы, а я как проверяющий согласовывать или нет по ГОСТу, но такая наша структура как РЖД не обладает достаточно квалифицированными для этого кадрами, а схемы по ГОСТу нужны мне, вот и получается что если хочешь что бы все было хорошо - сделай сам)) Поэтому и размер вознаграждения по рыночным меркам достаточно альтруистический :roll: но на месяц "безлимитного" болтания по телефону надеюсь хватит
Изображение


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 06 ноя 2015, 11:38 
Не в сети

Зарегистрирован: 06 ноя 2015, 11:32
Сообщений: 5
Использую Visio c: 2015
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Ну и если есть заинтересованные люди - прошу в лс! дабы не оффтопить в теме.
Ну, а если нет - будем рисовать ручками :wall:
Спасибо всем за поддержку!


Последний раз редактировалось Мария 06 ноя 2015, 11:38, всего редактировалось 1 раз.

Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 06 ноя 2015, 11:38 
Не в сети
Administrator

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

Добавить очки репутацииУменьшить очки репутации
Цитата:
По идее всю эту работу должны делать собственники предприятий, предоставляющих схемы, а я как проверяющий согласовывать или нет по ГОСТу

Какой хороший вариант для разработчиков :)
Разработчик выкладывает шаблон на своем сайте или в электронном магазине, а Вы рассказываете собственникам предприятий, где можно купить правильный шаблон по ГОСТ. И все довольны.
Кстати, судя по ГОСТ, в шаблон помимо рамки не мешает включить еще и настроенную палитру. Уж больно жестко там цвета заданы.
А сколько листов обычно занимает схема?
И если лист не один, то какие штампы на последующих листах - такие же или нет?


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 06 ноя 2015, 11:43 
Не в сети
Ветеран
Аватара пользователя

Зарегистрирован: 28 апр 2013, 14:03
Сообщений: 484
Откуда: Вена, Австрия
Использую Visio c: 1998
Очков репутации: 100602

Добавить очки репутацииУменьшить очки репутации
Tumanov писал(а):
Цитата:
По идее всю эту работу должны делать собственники предприятий, предоставляющих схемы, а я как проверяющий согласовывать или нет по ГОСТу

Какой хороший вариант для разработчиков :)
Разработчик выкладывает шаблон на своем сайте или в электронном магазине, а Вы рассказываете собственникам предприятий, где можно купить правильный шаблон по ГОСТ. И все довольны.


Так и будет (через пару лет?), как мелкомягкие наконец раскачаются :)

_________________
Инструменты для облегчения создания диаграмм, и статьи по Visio:
http://unmanagedvisio.com/


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 06 ноя 2015, 11:53 
Не в сети

Зарегистрирован: 06 ноя 2015, 11:32
Сообщений: 5
Использую Visio c: 2015
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Tumanov
проблема в том - что они вообще не умеют пользоваться ПО, все схемы еще с древних времен выведены по кальке и отсканированы! Автоматизировать никто ничего не хочет, а зато какая пиар компания и ребрендинг! :twisted:
В прошлом году я еле-еле перечертила все в эл.вид в визио (сама училась автокаду, но это ведь платное ПО! айайай), переплевалась и перепсиховала только так))
В этом году - здрасте нате - решили придумать новый ГОСТ :(
Проблему с цветами хотела решить настройкой слоев для каждого класса напряжения.
Схема по возможности всегда укладывается в 1 лист (обычно А3), если нет - играемся с форматами. Каждая схема - отдельный документ, никаких описаний/спецификаций в себе не несет.
Вот пример схемы (от греха подальше замылила текст немного)
Изображение


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 06 ноя 2015, 16:35 
Не в сети
Administrator

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

Мария писал(а):
дабы не оффтопить в теме.

Surrogate™ лучше проведет очередной урок кройки и шитья :)

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


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 06 ноя 2015, 19:39 
Не в сети
Administrator

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

Добавить очки репутацииУменьшить очки репутации
Немножко в ГОСТе написано. Но роли подписывающих не указаны.
https://www.dropbox.com/s/rkr0mchx0rqlb ... 4.pdf?dl=0
Первый раз, кстати, вижу ГОСТ, рассчитанный на цветное изображение.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 07 ноя 2015, 00:53 
Не в сети
Administrator

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3330
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Связь
Должность: Бывший проектировщик
Уровнь квалификации: ShapeSheet, VBA
Tumanov писал(а):
Первый раз, кстати, вижу ГОСТ, рассчитанный на цветное изображение.
дык Мария писала
Мария писал(а):
В этом году - здрасте нате - решили придумать новый ГОСТ :(
такие они новые ГОСТы!
Мария писал(а):
но такая наша структура как РЖД не обладает достаточно квалифицированными для этого кадрами
Зачем вы так, я в 2008 ездил в МЭС Юга, там были весьма прошаренные ребята.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Трафарет РД по ГОСТ Р 21.1101-2013 v4 с поддержкой макросов
СообщениеДобавлено: 09 ноя 2015, 12:08 
Не в сети

Зарегистрирован: 06 ноя 2015, 11:32
Сообщений: 5
Использую Visio c: 2015
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
про МЭС - ни слова! там они знают цену схемам) с ними никаких приблем, да и чертят в автокаде)
а вот с иными субъектами э/э сложнее, мало кто из них заинтересован в грамотно и красиво оформленных нормальных схемах.
Спасибо Aleksandr за трафарет штампа! Дальше буду сама)


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

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



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

Сейчас этот форум просматривают: Google [Bot] и гости: 1


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

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