Нужна функция в Excel по вставке рисунков

Программирование на Visual Basic for Applications
vLADDD
Начинающий
Начинающий
 
Сообщения: 5
Зарегистрирован: 31.10.2005 (Пн) 16:19

Нужна функция в Excel по вставке рисунков

Сообщение vLADDD » 31.10.2005 (Пн) 18:05

Нужна функция в Excel по вставке рисунков в соответствующие ячейки столбца. Аргументом функции выступают ячейки(путь и имя файла рисунка- «Parth») соседнего столбца.
Пробовал см. ниже Не катит.

Public Function pic5(Parth As String)
ActiveSheet.Pictures.Insert ("Parth")
End Function

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 31.10.2005 (Пн) 18:30

http://lib.web-malina.com/getbook.php?bid=216&page=31 писал(а):HEДABHИЙ BЫПУCKHИK ШKOЛЫ IBM. HE БOЛEE OДHOГO ИЗ ДECЯTИ OKOHЧИBШИX ЭTУ ШKOЛУ ЗHAЮT PAЗHИЦУ MEЖДУ 2 И '2'. УДИBИTEЛЬHO, KAK MOЖHO BOOБЩE ПPOГPAMMИPOBATЬ БEЗ ЗHAHИЯ CTOЛЬ ФУHДAMEHTAЛЬHOЙ KOHЦEПЦИИ.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

uhm
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1597
Зарегистрирован: 02.12.2004 (Чт) 15:21

Сообщение uhm » 31.10.2005 (Пн) 18:32

Советую начинать осознавать разницу между Parth и "Parth".

(если без выпендрежа - то убери кавычки во второй строке :) ).
Быть... или не быть. Вот. В чём вопрос?

vLADDD
Начинающий
Начинающий
 
Сообщения: 5
Зарегистрирован: 31.10.2005 (Пн) 16:19

Без "" то же не работает

Сообщение vLADDD » 31.10.2005 (Пн) 19:34

Function pic5(ParthPic As String)
ActiveSheet.Pictures.Insert (ParthPic)
End Function

не работает
Может др. оператор вставки есть

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 31.10.2005 (Пн) 19:37

И скобки убери.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

vLADDD
Начинающий
Начинающий
 
Сообщения: 5
Зарегистрирован: 31.10.2005 (Пн) 16:19

Сообщение vLADDD » 31.10.2005 (Пн) 19:42

Public Function pic5(ParthPic As String)
ActiveSheet.Pictures.Insert ParthPic
End Function

Не работает

C:\Мои документы\Мои рисунки\москва.jpg #ЗНАЧ!

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 31.10.2005 (Пн) 19:50

Почему #ЗНАЧ?


Или ты её с листа вызываешь?
Функциям листа запрещено менять лист.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

vLADDD
Начинающий
Начинающий
 
Сообщения: 5
Зарегистрирован: 31.10.2005 (Пн) 16:19

Сообщение vLADDD » 31.10.2005 (Пн) 19:53

И функция
=pic5(RC[-6])

и аргумент функции C:\Мои документы\Мои рисунки\москва.jpg

находятся на одном листе Excel

KL
Microsoft MVP
 
Сообщения: 483
Зарегистрирован: 30.10.2005 (Вс) 0:31
Откуда: Madrid

Сообщение KL » 31.10.2005 (Пн) 21:12

Privet,

Za redkimi iskliucheniyami, kak uze bylo skazano vyshe, formula vyzyvayemaya s lista ne mozhet sozdavat', udaliat' ili meniat' ob'ekty.
Привет,
KL

vLADDD
Начинающий
Начинающий
 
Сообщения: 5
Зарегистрирован: 31.10.2005 (Пн) 16:19

Сообщение vLADDD » 31.10.2005 (Пн) 22:29

Какие могут быть варианты. Нужно вставить в Excel-ий лист столбец рисунков. Пути и имена файлов прописаны в соседнем столбце.

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 31.10.2005 (Пн) 22:30

Запустить один раз макрос, который вставит их, и сохранить.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 46

    TopList