|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
15.09.2016, 20:55 | #1 |
Пользователь
Регистрация: 15.08.2016
Сообщений: 32
|
Вставка полноразмерных картинок из HDD в ячейки
Макрос с сайта http://ExcelVBA.ru
На данный момент работает исправно, за исключением случая, когда вставляется "глубокое фото" (т.е. когда длина меньше высоты) в ряду с прочими: Код:
Код:
Спасибо за Ваши ответы!
http://imageshack.com/a/img922/5707/6yizfA.gif
|
15.09.2016, 21:51 | #2 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Специально для устранения этих проблем я сделал расширенную версию этого макроса:
http://excelvba.ru/programmes/PastePictures Там все вставляется корректно, и много опций по настройке размеров |
15.09.2016, 22:12 | #3 | |
Пользователь
Регистрация: 15.08.2016
Сообщений: 32
|
Цитата:
1) вставка в примечания с http://www.planetaexcel.ru/techniques/9/128/; 2) указанный выше макрос; 3) Вашу надстройку; 4) нашел еще один Ваш макрос (код ниже), интересно: что изменить нужно для того, чтобы уменьшить картинку при сохранении пропорций в данном коде Код:
http://imageshack.com/a/img922/5707/6yizfA.gif
Последний раз редактировалось Lama Under Cover; 15.09.2016 в 22:15. |
|
18.09.2016, 17:56 | #4 |
Пользователь
Регистрация: 15.08.2016
Сообщений: 32
|
Дело в том, что качественные фотографии, например 5000 на 3000 пикселей сразу открываются в масштабе 100%, по этой причине моего монитора 1920 1080 не хватает на подобные превьюшки!
Как лучше сделать то же самое, но уже с двумя столбцами для каждого имени, т.е. вместо текущего одного изображения для наименования будут отображаться два? Сам для этого заменил Код:
Код:
Файл в приложении! Для корректной работы обязательно нужно разархивировать файлы после скачивания
http://imageshack.com/a/img922/5707/6yizfA.gif
Последний раз редактировалось Lama Under Cover; 18.09.2016 в 20:34. Причина: Добавил файл |
18.09.2016, 20:39 | #5 |
Пользователь
Регистрация: 15.08.2016
Сообщений: 32
|
Разобрался! Всему виной то, что названия файлов у меня содержали лишь цифры, поэтому приходилось ждать при наведении несколько секунд.
Надеюсь на чью-либо помощь в разрешении основной задачи - уменьшить картинку при сохранении пропорций..
http://imageshack.com/a/img922/5707/6yizfA.gif
|
19.09.2016, 00:23 | #6 |
Форумчанин
Регистрация: 09.06.2011
Сообщений: 388
|
Если под уменьшением подразумевается ее "полное" отображение в форме, то установите для свойства формы PictureSizeMode значение fmPicrureSizeModeZoom
на неконкретные вопросы даю неконкретные ответы ...
|
21.09.2016, 23:38 | #7 | |
Пользователь
Регистрация: 15.08.2016
Сообщений: 32
|
Цитата:
Лучшее решение для предпросмотра картинок, на мой взгляд, из всех рассмотренных мною, именно это! Все работает! И, что самое главное, быстро работает!
http://imageshack.com/a/img922/5707/6yizfA.gif
Последний раз редактировалось Lama Under Cover; 21.09.2016 в 23:44. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вставка изображений в объединенные ячейки | maragva | Microsoft Office Excel | 1 | 03.04.2014 20:20 |
Вставка картинок, вытянутых из Базы Данных | Apoka5555 | Базы данных (ADO.NET, LinqToSql, ORM Entity Framework, NHibernate) | 0 | 04.10.2013 21:47 |
StringGrid: вставка картинок | Grass-snake | Общие вопросы Delphi | 2 | 25.10.2011 15:00 |
Вставка картинок в текстовый документ | PONKA | Общие вопросы Delphi | 0 | 04.02.2009 12:54 |