Добрый день! К сожалению, владея excel на уровне продвинутого пользователя, не сподобился изучить VB, и за полдня явно его не изучу. Итак, есть файл с названиями оборудования, есть раскиданные по нескольким каталогам сметы. Необходимо по маске номера сметы (цифровое значение в столбце "Смета"), нужно: 1. Найти файл сметы в каталоге \Исходные, включая подкаталоги. Имя файла может иметь любой вид, но в нем обязательно присутствует номер, к примеру, "9907.pdf", "C14444 Механическое оборудование маслохозяйства.pdf" итд итп. Все сметы в *.pdf. 2. Скопировать найденный файл в каталог \Сметы, переименовав в случае необходимости, в виде 14444.pdf. Если файл не найден, просигнализировать об этом в строке комментариев. 3. В столбце "Смета" создать гиперссылку на скопированный файл. Архив с примером добавляю. Работаю с Excel 2003. з.ы. Запилил программку на поиск, копирование и переименовывание файлов, предварительно вылив в текстовый файл номера смет, но не по фен-шуй же!
Добрый день! К сожалению, владея excel на уровне продвинутого пользователя, не сподобился изучить VB, и за полдня явно его не изучу. Итак, есть файл с названиями оборудования, есть раскиданные по нескольким каталогам сметы. Необходимо по маске номера сметы (цифровое значение в столбце "Смета"), нужно: 1. Найти файл сметы в каталоге \Исходные, включая подкаталоги. Имя файла может иметь любой вид, но в нем обязательно присутствует номер, к примеру, "9907.pdf", "C14444 Механическое оборудование маслохозяйства.pdf" итд итп. Все сметы в *.pdf. 2. Скопировать найденный файл в каталог \Сметы, переименовав в случае необходимости, в виде 14444.pdf. Если файл не найден, просигнализировать об этом в строке комментариев. 3. В столбце "Смета" создать гиперссылку на скопированный файл. Архив с примером добавляю. Работаю с Excel 2003. з.ы. Запилил программку на поиск, копирование и переименовывание файлов, предварительно вылив в текстовый файл номера смет, но не по фен-шуй же!Сашико
Решил "проблему" через эммм.... нехорошее место. В текстовом файлике строке со сметой дописАл маршрут или комментарий "Файл не найден", залил обратно в excel, отфильтровал, и в третьем столбце нарисовал через =ГИПЕРССЫЛКА() результат. Но не по фен шуй же.... Тему можно закрывать.
Решил "проблему" через эммм.... нехорошее место. В текстовом файлике строке со сметой дописАл маршрут или комментарий "Файл не найден", залил обратно в excel, отфильтровал, и в третьем столбце нарисовал через =ГИПЕРССЫЛКА() результат. Но не по фен шуй же.... Тему можно закрывать.Сашико