|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
03.03.2014, 17:02 | #1 |
Новичок
Джуниор
Регистрация: 03.03.2014
Сообщений: 1
|
Вставка картинки соответствующей содержанию ячейки
Добрый день!
Столкнулся с проблемой: Данные в файле формируются посредством ВПР из разных баз. Единственное с чем не получается - это изображение. Действие происходит следующим образом: в ячейку "K1" вписывается ФИО человека, по этому ФИО данные собираются с разных мест. Есть папка с изображениями "C:\System32\Picture\Avatar\", где названия фото соответствуют ФИО людей. Мне необходимо чтобы по нажатию кнопки фото тоже подтягивалось из папки в ячейку "I5" (или диапазон ячеек) - оптимально по ширине или высоте ячейки (выравнивание по левому краю). Перерыв интернет нашел только такую формулу, но она не срабатывает, скорее всего из-за неправильного названия ячейки: Sub SelectionPhoto() If Target.Address = "K1" Then ActiveSheet.Pictures.Insert("C:\Sys tem32\Picture\Avatar\" & Target.Value).Select Selection.Left = Columns("Z").Left Selection.Top = Rows(5).Top End If End Sub |
03.03.2014, 18:12 | #2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
1. напишите в начале процедуры такую доп. строку:
debug.print Target.Address 2. нажмите в редакторе ВБА Ctrl+G (откроется окно Immediate) 3. выполните SelectionPhoto 4. посмотрите то, что отобразилось в окне Immediate равно К1 (даже когда отмечена К1)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вставка картинки в Word | GBAXA | Общие вопросы Delphi | 1 | 02.07.2010 23:56 |
Вставка картинки в listbox | Rapala | Мультимедиа в Delphi | 0 | 16.05.2010 16:04 |
Вставка картинки | Artem | HTML и CSS | 6 | 24.10.2007 14:02 |
Вставка картинки в проект | Flash_ | Gamedev - cоздание игр: Unity, OpenGL, DirectX | 9 | 18.01.2007 22:00 |