Надстройка для вставки картинок (изображений) в Excel

Уведомляю, что 6 октября 2012 г. стала доступна новая версия программы вставки изображений в Excel (версия 2.0.0).

Изменения в новой версии программы:

+ надстройка вставки изображений в Excel полностью переработана

+ запуск вставки изображений теперь выполняется из меню программы (на панели инструментов)

+ реализована возможность вставки изображений по ссылкам

+ надстройка теперь поддерживает обновления - поэтому отныне надстройка будет регулярно получать новые полезные функции.

Рекомендую обновить программу до последней версии!

Новый функционал будет добавляться в надстройку по мере поступления ваших пожеланий.

Евгений, программа вставки изображений (в нынешнем её виде) временно не поддерживается.
Сейчас готовлю к публикации новую версию, в которою уже буду вносить изменения согласно замечаний пользователей.

Насчёт вашего случая - если вы указываете путь к FTP в качестве пути к папке, то такая проблема вполне возможна.
Дело в том, что пути к папкам содержат обратный слэш \
а путь к FTP содержит прямые слэши /
Потому программа, видя, что путь к папке в конце не содержит обратного слэша, и добавляет его.

PS: Вообще, программа на данный момент не поддерживает поиск файлов (картинок) на FTP.
FTP - это же не обычная папка, где можно выполнять поиск файлов.
Другое дело, если вы на своём компе подключите FTP папку как сетевой диск (например, при помощи программ типа WebDrive или FTPDrive) - тогда картинки ваши будут доступны как на обычном жестком диске, и моя надстройка будет корректно работать (т.к. вы укажете локальный путь к папке, - например, Z:\фото\)
Но, в этом случае, возможно, что поиск изображений будет выполняться очень долго.

Извините, но я - не телепат.
Может, вы забыли задать в настройках папку, содержащую картинки?
Или, может, в выбранной папке нет изображений?

Если вы не можете разобраться с готовой протестированной программой - то, как я уже говорил, обращайтесь в ICQ или Skype, объясняйте, что надо сделать, - и я вам сам всё настрою, подключившись к вашему компьютеру (но это не бесплатно)

Чем я вам помогу? У всех - работает (сотни людей пользуются), а у вас - нет...
У вас хоть какая OC? Надеюсь, Windows?
Office переустанавливать не нужно. Всё и так должно работать, в любом Office.
Запускаете Excel, запускаете прикреплённый к статье файл, нажимаете комбинацию клавиш - отображается форма.

Я, конечно, могу помочь вам запустить файл (если установите TeamViewer, и потом через ICQ или Скайп сообщите мне ID и пароль) - но это будет не бесплатно.

Вообще-то, надо просто включить макросы в Excel.
И всё сразу заработает.
Как это сделать - написано (и показано) здесь:
http://excelvba.ru/articles/EnableMacros/Excel

Здравствуйте, Илья.
Надо заменить все гиперссылки с абсолютных (содержащие полный путь к файлу) на относительные.
В этом может помочь макрос типа такого: http://excelvba.ru/code/replace_hyperlinks

В новой версии надстройки (которая появится уже скоро) будет доступна опция добавления относительных гиперссылок.

2. функцию добавили на лист объекта ("VBAProject/Microsoft Exel Objects/Sheet1")

Куда-то вы не туда вставили функцию.
Надо в стандартный модуль вставить

И ещё в макросе надо прописать обработчик ошибок (что делать, если файл с картинкой не найден),
и переделать функцию вставки, если вы используете Excel 2010 (иначе вставленные картинки не будут сохраняться с файлом Excel)

Я лишь показал вам упрощенный пример такого макроса.
Чтобы он стабильно работал во всех случаях, его надо дорабатывать.

Если самостоятельно не справитесь - оформляйте заказ на сайте, я сам всё сделаю (за денежку)

Я, конечно, не Павел, но отвечу)

Конечно, можно и в строке брать имена файлов, и в строку ниже вставлять картинки.
Переделывать эту универсальную надстройку - будет сложновато,
проще написать небольшой макрос под ваши нужды, для конкретно вашего файла.
(вам ведь наверняка не нужны все эти настройки, присутствующие в программе)

Sub ВставкаКартинокВСтроку()
    Dim cell As Range: Application.ScreenUpdating = False
 
    ' в цикле перебираем ячейки с именами файлов
    For Each cell In Range("a1:k1").Cells
        ' формируем путь к файлу изображения
        ПутьККартинке$ = "d:\pictures\" & cell & ".jpg"
        ' вставляем найденную картинку в ячейку ниже
        ВставитьКартинку cell.Offset(1), ПутьККартинке$, True, True, True
    Next cell
End Sub

Вам надо будет подкорректировать путь к папке с изображениями,
и добавить в код функцию вставки картинок из этой статьи:
http://excelvba.ru/code/PastePictures

Здравствуйте, Павел.
Какая программа пишет, что нет элементов для отображения? Точно моя надстройка?
Вроде я такого сообщения не делал.

Может, в выбранной вами папке действительно нет файлов-изображений?

Здравствуйте, Павел.
Это вам надо не надстройку скачать, а другой табличный редактор (вместо Excel)
Ограничение по высоте строки (409,50) встроено во все версии Excel его разработчиками - и никакая надстройка снять это ограничение не сможет.

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

Вы хотите сделать высоту ячейки больше 100 чего? пикселей, миллиметров, пунктов?

Я уже не помню, что там в коде, - но, может, я поставил это ограничение, чтобы не превысить максимальную допустимую высоту строки.

Попробуйте увеличивать высоту строки - упретесь в ограничение Excel:

у меня в Excel эта максимальная высота составляет 546 пикселей (409,5 пунктов)

PS: Сейчас в надстройке некоторые размеры (ячеек, картинок, примечаний) ограничены каким-то заранее заданным диапазоном.

В ближайшее время выложу новую версию надстройки, где можно будет снять эти ограничения.