SavePicture - выдает ошибку (Object Required) почему?

[tony1]

Код: Выделить всё

Sub test()
SavePicture Picture1.Picture, "C:\1.bmp"
End Sub

SavePicture - выдает ошибку (Object Required) почему?
(Runtime error /424/)

МОЖЕТ КАКАЯ ФУНКЦИЯ НЕ ЗАДИКЛАРИРОВАННА?

[Jenizix]

хм.... у меня все пашет нормально... а 424 т.к. может у тебя не picture1 называется???

[GM]

Так объекта Picture1.picture может не существовать.
Попробуй так:

Код: Выделить всё

Sub test()
SavePicture Picture1.image, "C:\1.bmp"
End Sub


[tony1]

Так объекта Picture1.picture может не существовать.
Попробуй так:

Код: Выделить всё

Sub test()
SavePicture Picture1.image, "C:\1.bmp"
End Sub


если в Excel навести на эту картинку курсор там пишется "Рисунок 1"

но так как написано внизу писать нельзя VBA не поймет "Рисунок 1" там же есть пробел =(((

Код: Выделить всё

Sub test()
SavePicture Картинка 1.image, "C:\1.bmp"
End Sub


[/quote]

[Inferno]

Под Picture1 не имеется ввиду слово картинка, а имеется в виду контейнер куда эта картинка загружена (в данном случае элемент с нарисованным на нем кактусом )

если ты напишешь SavePicture Картинка 1.image, "C:\1.bmp" , то у тебя уж точно ничто никуда не сохранится.

Код: Выделить всё

Private Sub Form_Load()
   Picture1.Picture = LoadPicture("d:/test.jpg")
   SavePicture Picture1.Picture, "d:/test.bmp"
End Sub


Отвечаю на следующий вопрос- сохранить можно тольго в формате bmp.