Макрос для excel (монтажные схемы)
 

Доброго времени суток)
Из за неоднократного переоборудования станции, столкнулись с необходимостью восстановления большого количества монтажных схем(принципиальных тоже, но сначала с монтажными бы разобраться)
Старые смысла смотреть нет, правка на правке. Весь монтаж вспорот, пора восстанавливать схемы)
Собирался писать что то свое, но сначала решил посмотреть здесь)
В нескольких темах на форуме мелькал некий макрос для excel от ГТСС, который упрощает данную работу. Буду очень благодарен если кто то им поделится.

Спасибо! Но не совсем то, что искал. Упоминалось про макрос, проставляющий обратные адреса. Выкладываю то, что получилось из наработок. Приспособлено под метрополитеновские стативы. один файл - один статив. Изначально необходимо создать копию файла primer.xls и назвать его номером статива, созданый файл и файл primer.xls поместить в одну папку. Далее работать с файлов статива. Автоматически прописывает обратный адрес, создает новые полки, а так же новые стативы (файлы) с новыми полками)

других не попадалось.

А как полки в этом файле добавлять?

Делайте копию вкладки pr и называйте её номером своей полки. В самой вкладке pr ничего вносить не нужно, так как при автоматическом создании полок, делается копия как раз вкладки pr.

Классная штука. А как связь между полками работать заставить?

А что конкретно не работает?
В макросе пока расписано 4 сценария:
1) ввели просто цифру (без тире) - обратный адрес проставляется в этом же приборе;
2) ввели 6-21 (одно тире, перед тире один символ) адрес проставляется в пределах полки (место 6 контакт 21);
3) ввели 231-21 (одно тире, перед тире больше чем один символ) из последнего перед тире символа берется место, из тех что перед ним - полка, если её не существует то сначала она создается, потом проставляется обратный адрес;
4) ввели 49-231-21 (два тире) если не существовало, создается файл 49, далее по сценарию из пункта 3.

А для верхов/низов, боков, кросса такое есть?

На выходных скину прогу.
Ставьте пока 2003 офис, с более новыми она не работает.
Есть полки, в том числе нештепсельные, преды, резисторы, верхушки, низушки.

А почему приборов 6?

ТС выше писал что под новые метрополитеновские стативы. Вероятно, стативы СУР.

Только офис 2003.
Работает со шкафами ШРУ-М, и стативы (релейные и кроссовые).
Верхушки, низушки стативов, дно, боковины и клеммы шкафа окучивает, преды, разрядники, остальную мелочь ставить умеет.
Функции:
Заполнение комплектаций
Создание листов полок по комплектациям
Заполнение обратных адресов
Заполнение обратных адресов с выделением нового монтажа
Удаление обратных адресов
При заполнении обратных адресов также заполняет питание
При заполнении обратных адресов также заполняет сечение (знаки *, **)
В пределах одного листа можно заполнить адреса, просто выделив две ячейки (ссылки-адреса друг на друга заполнятся автоматически, без ввода цифр).
Подробнее - в хелпе внутри файла.

Надеюсь, авторы программы простят меня (всё-таки ей больше 15 лет)

Или чего-то не хватает или я ничего не понял. Прочитал все хелпы. Скачал Офис 2003 (портативный). Открываются данные для заполнения штампа и все. Отбой. Вроде нашел.

А у меня в HELPe вот такое:
https://i.ibb.co/qrmQKn1/Screenshot-2.jpg https://i.ibb.co/34kPts9/Screenshot-3.jpg
Черные поля на всех вкладках :net: