|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.01.2017, 09:43 | #1 |
Пользователь
Регистрация: 02.01.2017
Сообщений: 14
|
Вставка фото с сохранением пропорций и ограничением по длине или ширине
Доброго времени.
Подскажите господа - как подправить макрос. У меня макрос вставляет фото - по событию Change, при изменении ячейки с адресом. И при этом задает ширину и высоту картинки. В итоге она безобразно растягивается. Код:
|
25.01.2017, 13:01 | #2 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Посмотрите готовое решение
http://excelvba.ru/programmes/PastePictures там уже всё реализовано А если сами хотите писать макрос, - надо вставлять на лист картинку без изменения размеров (или получать размеры картинки непосредственно из файла, без вставки), потом вычислять ширину (основываясь на исходных размерах и нужной длине), и масштабировать картинку после вставки Либо второй вариант, - после вставки включаем у картинки сохранение пропорций (свойство LockAspectRation = true), и меняем длину (ширина сама изменится), а потом подгоняем картинку по координатам под центр ячейки |
10.02.2017, 08:33 | #3 |
Пользователь
Регистрация: 02.01.2017
Сообщений: 14
|
Ясно.
Спасибо за ответ |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вставка фото | adward67 | Microsoft Office Excel | 1 | 13.06.2015 21:57 |
Вставка строк (с сохранением формулы) со смещением общего итога вниз | DIMONRUS | Microsoft Office Excel | 10 | 07.08.2013 16:06 |
Создать новый компонент ТLabel с ограничением по длине текста ввода | mila_f | Компоненты Delphi | 4 | 20.02.2012 19:57 |
Вставка таблиц в шаблон с выравниванием по ширине окна | Polotenchik | Microsoft Office Word | 22 | 26.03.2010 22:07 |
Изменение пропорций рисунка, макрос | laneon | Microsoft Office Excel | 4 | 12.02.2009 04:49 |