Developing.ru

В файле Excel создан элемент управления Image с именем "Image1". В VBA ACCESS 2002-2003 пытаюсь вставить картинку:

Dim xlApp As Object
Dim xsS As Object

Set xlApp = New Excel.Application
xlApp.Visible = True
xlApp.Workbooks.Open ("MyFile.xls")
Set xsS = xlApp.ActiveWorkbook.Sheets("List1")

xsS.Image1.Picture = LoadPicture("MyPic.jpg")
........

Последний оператор выдает ошибку
[ATTACH]887[/ATTACH]

Не могу понять почему. Заранее Спасибо!

Здравствуйте AlVBA.
Избавиться от этой проблемы (и подобных в будущем) можно указав полный путь к файлу: Евгений.

Это пробовал. Не получается.

Это из-за конфликта имен
D Access, в отличие от Excel, два метода LoadPicture
Access.LoadPicture
и
StdFunctions.LoadPicture
Вам нужен второй, а вызывается первый. В результате получается значение такого типа, которое не присваивается свойству Picture.
Выход: пишите названием функции с явным квалификатором, т.е.
StdFunctions.LoadPicture