0

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

Как выгрузить все картинки и назначить им имя из ячейки с названием картинки?

1
  • интересно по какому критерию минусовка производится? По содержимому ? Оно , конешно, приятно, что кто-то читает, но было б приятней получить ответ, а не школьную оценку....
    – Вадим
    5 мая 2015 в 12:04

1 ответ 1

1

У объекта ActiveWorkbook.ActiveSheet есть свойство Shapes.

  1. Перебираем все Shapes и находим левую верхнюю ячейку (TopLeftCell) относительно картинки;
  2. Берем содержимое ячеки правее (это будет имя файла);
  3. Записываем картинку в файл, например как сказано тут

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

8
  • спасибо за исчерпывающий ответ....к сожалению я надеялся на более легкий путь. И то, что полсле PS это как раз относится к моей задаче. Но зато теперь есть тыл - и это приятная новость.
    – Вадим
    5 мая 2015 в 13:11
  • Если вылезает в соседний столбец, то тут все просто - игнорируем полученный столбец и указываем правильный. Со строкой хуже. Нужно смотреть по "обстановке". Например если картика есть в каждой строке, то обрабатывать ситуации когда строки пропускаются или оказываются две картинки в строке 5 мая 2015 в 13:15
  • не... ну с дальнейшей логикой я справлюсь, не программно - так ручками (скорее чужими). для экселя даже ТОРГ12 как в 1с выводил. но за дополнения отдельное спасибо.
    – Вадим
    5 мая 2015 в 13:40
  • а есть ли рекомендации(примеры) по извлечению картинок написанных на java?
    – Вадим
    12 мая 2015 в 13:24
  • "картинок написанных на java" это как? Или, из чего извлекать? 12 мая 2015 в 13:40

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge you have read our privacy policy.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.