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

Форум по вопросам применения и программирования в Visio
Текущее время: 19 окт 2017, 02:20

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


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


При размещении файлов предпочтительным является формат vsd (а не vsdx/vsdm)



Начать новую тему Ответить на тему  [ Сообщений: 77 ]  На страницу Пред.  1, 2, 3, 4
Автор Сообщение
 Заголовок сообщения: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 24 сен 2016, 10:50 
Не в сети
Новичок

Зарегистрирован: 24 сен 2016, 10:28
Сообщений: 22
Использую Visio c: 2014
Уровнь квалификации: пока плохо
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Добрый день !

Буду очень благодарен за помощь в решении задачи:
1. Есть схемы в формате "визио" с указанием адресов (это текстовые поля) элементов схемы. (Схема1)
2. Есть таблица соответствия неправильного текста - правильному, колонки А и В соответственно.
Можно ли автоматизировать процесс поиска в нескольких схемах текста из колонки А и их замену на текст из колонки В ?
Дополнено позднее: Тема получила свое продолжение в ветках обсуждения:
Find&Replace Addon For MS Visio
Скорость обработки документов Visio из Excel


Вложения:
1.rar [32.61 Кб]
Скачиваний: 27
IP адреса.xlsx [8.79 Кб]
Скачиваний: 35


Последний раз редактировалось Surrogate 20 фев 2017, 00:31, всего редактировалось 1 раз.
добавлены ссылки на родственные ветки
Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 27 сен 2016, 18:49 
Не в сети
Ветеран

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

Добавить очки репутацииУменьшить очки репутации
Ну что же. Значит пользуйся предыдущей версией.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 28 сен 2016, 18:36 
Не в сети
Новичок

Зарегистрирован: 24 сен 2016, 10:28
Сообщений: 22
Использую Visio c: 2014
Уровнь квалификации: пока плохо
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
СПАСИБО за помощь !!!

Думаю удастся решить эти ньюансы созданием определенных правил для выполнения задачи.
Что-то типа
1 делаем первый проход с заменой адресов
2. делаем второй проход с заменой только фамилий ... и т.д.

Вот попробовал запускать такие разделенные по тематике таблицы

Пока запускал последндюю версию.
Сделал 2 файла «IP адрес», по одному для каждого прохода
Первый проход сделал файлом в котором только IP адреса и телефоны в разных форматах
[i]

Цитата:
Начало записи: 28.09.2016 20:51:06
Документ: C:\testFOLDERtest\Схема1.vsd
Лист: Page-1
Sheet.10: 10.255.0.1 > 10.221.55.55
Sheet.15: 10.255.0.2 > 10.221.66.66
Sheet.17: 10.255.0.3 > 10.221.77.77
Sheet.23: +7-234-567-89-00 > +7-999-888-77-77


РЕЗУЛЬТАТ: Не смог заменить номера, записанные одним числом (81234567899), видимо это лечится форматированием таких телефонов в таблице в ТЕКСТ.
Буду пробовать, но не сегодня.


Цитата:
Лист: Page-2
Sheet.10: 10.255.0.11 > 10.221.11.11
Sheet.15: 913-666-55-44 > 8-913-333-22-11
Sheet.11: 10.255.0.22 > 10.221.22.22
Sheet.12: 10.255.0.33 > 10.221.33.33
Sheet.16: +7-234-567-89-00 > +7-999-888-77-77
Лист: Page-3
Sheet.10: 10.255.255.252 > 10.221.0.01
Sheet.15: 10.255.255.253 > 10.221.0.02
Sheet.22: 913-666-55-44 > 8-913-333-22-11
Sheet.17: 10.255.255.254 > 10.221.0.03
Sheet.23: +7-234-567-89-00 > +7-999-888-77-77


Второй проход сделал запуском файла в котором только ФИО – отработал правильно на всех шейпах

Цитата:
Начало записи: 28.09.2016 20:51:51
Документ: C:\testFOLDERtest\Схема1.vsd
Лист: Page-1
Sheet.22: Иванов И.И. > Петров П.П.
Sheet.23: Пупкина Ж.Ж. > Шмупкина З.З.
Лист: Page-2
Sheet.15: Иванов И.И. > Петров П.П.
Sheet.16: Пупкина Ж.Ж. > Шмупкина З.З.
Лист: Page-3
Sheet.22: Иванов И.И. > Петров П.П.
Sheet.23: Пупкина Ж.Ж. > Шмупкина З.З.

Документ: C:\testFOLDERtest\Схема1_new.vsd
Лист: Page-1
Лист: Page-2
Лист: Page-3


Может мало вариантов и самих записей в тестовых файлах, но отработал всё правильно.
На боевых файлах смогу проверить не раньше вторника.

Обязательно отпишусь.


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

Зарегистрирован: 24 сен 2016, 10:28
Сообщений: 22
Использую Visio c: 2014
Уровнь квалификации: пока плохо
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Попробовали замену адресовна боевых файлах - работает безотказно, как Калашников !!!
Делали как и в последний раз в два прохода.
А вот вторую часть задачи, замена ФИО, телефонов и прочего как-то непредсказуемо.
Может можно предварительно пройтись по всем файлам текущей папки и подпапкам и считать в колонку "А" все тексты из шейпов.
Тогда их можно было бы вручную просмотреть и при необходимости написать в "В" текст для замены.
Ну что-то вроде подготовительного этапа.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 06 окт 2016, 17:56 
Не в сети
Ветеран

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

Добавить очки репутацииУменьшить очки репутации
Скачай заново архив. Запускай файл 'Сохранить текст.xlsm'. Только поправь переменные:
Код:
Const Path =
Const ColAdr =


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

Зарегистрирован: 24 сен 2016, 10:28
Сообщений: 22
Использую Visio c: 2014
Уровнь квалификации: пока плохо
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Приятный сюрприз, что дубли сразу самО ищет !
С вложенными папками тоже так просто мОжно вопрос решить?
Мы сейчас в одной папке все крутим, а если так ...

Код:
ПАПКА (Const Path =)
    |--Сохранить текст.xlsm -  Собирает тексты со всех подпапок ниже (1 уровень вложенности)
            |--Подпапка Схема1
                               |--Схема1.vsd
                               |-- ФАЙЛ ПОСЛЕ ЗАМЕНЫ
            |--Подпапка Схема2
                               |--Схема2.vsd
                               |-- ФАЙЛ ПОСЛЕ ЗАМЕНЫ 
                     . . .
             |--Подпапка СхемаХ
                               |--СхемаХ.vsd
                               |-- ФАЙЛ ПОСЛЕ ЗАМЕНЫ


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 06 окт 2016, 21:02 
Не в сети
Ветеран

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

Добавить очки репутацииУменьшить очки репутации
Сделал просмотр всех подпапок. Скачай.
А замену текста тоже так переделать? Сам сможешь? По образу и подобию. :)


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 18:05 
Не в сети
Новичок

Зарегистрирован: 24 сен 2016, 10:28
Сообщений: 22
Использую Visio c: 2014
Уровнь квалификации: пока плохо
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Мдя ... хотел всех удивить - не получается.
В целом я дебугером посмотрел и представляю как Оно работает, но вот как только начинаю пытаться эти циклы опроса вложенных папок добавлять в скрипты замены - у меня всё разваливается. Видимо в голове впервую очередь ...:)
Я какие-то глобальные вещи хорошо представляю, а как мелочи работают - просто не понимаю, поэтому логика не складывается.
Честно 3 часа потратил ... сдаюсь.
Обязательно учту при рОзливе !


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 18:32 
Не в сети

Зарегистрирован: 15 мар 2013, 00:55
Сообщений: 14
Использую Visio c: 2020
Очков репутации: 2

Добавить очки репутацииУменьшить очки репутации
Гость писал(а):
Честно 3 часа потратил ... сдаюсь.
хоть посмотреть бы, что удалось глобального сделать за 3 часа ? Изображение


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 18:45 
Не в сети
Ветеран

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

Добавить очки репутацииУменьшить очки репутации
Чего не получается - то? Сделать просмотр вложенных папок при замене? Еще вчера вечером от нефига делать сделал :) . Там я еще убрал запись в лог(и переименование тоже) если ничего не менялось в файле . Скачай заново.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 18:47 
Не в сети
Administrator

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3362
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Связь
Должность: Бывший проектировщик
Уровнь квалификации: ShapeSheet, VBA
Гость писал(а):
Обязательно учту при рОзливе !
О как ! Shishok, наверняка потратил более чем
Tumanov писал(а):
По моим прикидкам на первую работоспособную версию может уйти порядка двух часов работы.… Довольно часто после первой версии заказчику хочется еще что-то добавить, усовершенствовать. Понятно, что это можно делать до бесконечности...
и ты только обещаешь учесть при разливе ! Насколько я знаю Shishok не пьет Изображение.
можно просто накормить голодного, а можно дать ему удочку и научить ловить рыбу. наверно в этом случае мы не увидим нового рыболова Изображение


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

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

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

Ну кто знает. Если человек заинтересуется, то хотя бы изучая чужие готовые коды (особенно применительно к его личной задаче) можно понемногу освоить. Ну конечно надо будет полазить по профильной литературе или хоть в инете. Важен интерес, ну это как и во всем. :)


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 20:11 
Не в сети
Новичок

Зарегистрирован: 24 сен 2016, 10:28
Сообщений: 22
Использую Visio c: 2014
Уровнь квалификации: пока плохо
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Shishok - огромное тебе спасибо !!!
Тема раскрыта полностью! ИМХО
Всю "неучтенку" в процессе работы - буду дорабатывать напильником.



P.S.
Коллегам, которые только наблюдали и в итоге взорвались злобными выпадами - желаю добра и мира.
Нельзя абсолютно всё измерять деньгами и , тем более, считать их в чужих карманах.
Поставьте в начале форума прайс (вопрос-столько-то, ответ столько-то), объявите проект коммерческим и не нужно будет эту тему ворошить.
Если ко мне обращаются "за помощью" --- и это не мой бизнес - я делаю "за-так"

Я специалист немного в другой области, но профессионалов , как в своей , так и в другой профессии - просто уважаю.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 20:31 
Не в сети
Administrator

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

Добавить очки репутацииУменьшить очки репутации
Сдается мне, что в нас напоследок еще и плюнули... :)
Причем "за-так".
Вроде бы на этом форуме это первый такой случай.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 20:34 
Не в сети
Administrator

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3362
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Связь
Должность: Бывший проектировщик
Уровнь квалификации: ShapeSheet, VBA
AlexDen писал(а):
желаю добра и мира
та и тебе не хворать ?
AlexDen писал(а):
итоге взорвались злобными выпадами
просто поинтересовались, до чего же ты разобрался в глобальных вопросах
AlexDen писал(а):
Видимо в голове впервую очередь
согласен со словами
AlexDen писал(а):
Нельзя абсолютно всё измерять деньгами и , тем более, считать их в чужих карманах.
трудно сказать сколько бы ты без помощи пользователей Shishok и Tumanov бился над этим? ты сэкономил свое личное время. а они на тебя его потратили.
AlexDen писал(а):
объявите проект коммерческим и не нужно будет эту тему ворошить
это ты к кому конкретно обращаешься ?
AlexDen писал(а):
Если ко мне обращаются "за помощью" --- и это не мой бизнес - я делаю "за-так"
это вообще о чем ?
AlexDen писал(а):
Я специалист немного в другой области
очень рад за тебя !
AlexDen писал(а):
но профессионалов , как в своей , так и в другой профессии - просто уважаю.
ясно, где ж нам до вас !
Surrogate писал(а):
если нет желания платить, мы можем бесплатно помучить!
AlexDen писал(а):
Хочет учиться AlexDen !
я кроме этого
AlexDen писал(а):
Const Path = "C:\testFOLDERtest\" в скрипт я вставил, но не понял что происходит
ничего от тебя не увидел.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 20:40 
Не в сети
Новичок

Зарегистрирован: 24 сен 2016, 10:28
Сообщений: 22
Использую Visio c: 2014
Уровнь квалификации: пока плохо
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Я со всем уважением, вроде.
Кого обидел ?
Что значит "плюнул" ?


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 20:43 
Не в сети
Administrator

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


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Замена текста в нескольких файлах по таблице соответствия
СообщениеДобавлено: 07 окт 2016, 20:52 
Не в сети
Новичок

Зарегистрирован: 24 сен 2016, 10:28
Сообщений: 22
Использую Visio c: 2014
Уровнь квалификации: пока плохо
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Всёравно - СПАСИБО!

phpBB [youtube]

"Если один человек построил - другой, завсегда, разобрать может ..."


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

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



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

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


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

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