на главную Написать мне письмо ICQ 299-231-754

Экспорт картинок из EXEL

при помощи визуал бейсик Microsoft Access

Возникла задача:
картинки из книги Microsoft Excel
сохранить в отдельную папку, при этом должно быть указано
к какой строке принадлежит картинка.

Программу написал в базе данных Microsoft Access
поскольку там постоянно работаю.

Алгоритм такой:
Перебираем все картинки в книге Microsoft Excel
Для каждой картинки выполняем следующие действия:
  1. Определяем, в какой строке находится картинка
  2. Копируем картинку в буфер
  3. Создаем новую книгу
  4. Вставляем картинку из буфера
  5. Сохраняем новую книгу с одной картинкой как веб-страницу
  6. При этом создается файл HTM и папка "*.files" с картинками
  7. Закрываем новую книгу
  8. В папке "*.files" ищем картинку с максимальным размером, поскольку EXEL сохраняет несколько вариантов одной картинки.
  9. Найденную картинку переписываем во вновь созданную папку "*_фото", к названию добавляем номер строки и номер фото в строке
  10. Файл HTM и папку "*.files" с картинками удаляем
В итоге получаем папку, в которой картинки с названиями Строка002_фото1

Скачать базу и тестовый файл
В базе есть макрос Извлечь фото из EXEL - запусти
Текст программы в базе доступен для изменения.

Посмотреть текст программы