Did you try this suggestion:

Sheet1.OLEObjects("Image1").Object.Picture _
= LoadPicture("\\WIN2K3\IMAGES\8000\8029.JPG")



Rupesh wrote:

it worked fine for intellisense, but still facing same problem

myImage.Picture = LoadPicture("c:\rupesh\8022.JPG")

gives me automation error - unspecified error.

is it somthing to do with my Excel installation ? is somthing missing. I
have used this earlier also on different machine, long ago.

need to solve this ASAP

please help

"Dave Peterson" wrote:

Drop that "Sheet1.Image1.Picture = Nothing" line.

Then use a variable to represent the image.

Dim myImage As Image
Set myImage = Sheet1.Image1
myImage. and you should see the intellisense helping you.

Rupesh wrote:

what i see problem as when we type
sheet1.image1. (then automatically dropdown of the related properties is
not coming & there may be some problem

Pls help
Rupesh

"Rupesh" wrote:

I am trying to add image based on the parameters. but it gives me error

automation error / unspecified error

-2147467259(80004005)

following is my code (tring to run hardcoded image file)

Sub Addimage()
Sheet1.Image1.Picture = Nothing
Sheet1.Image1.Picture = LoadPicture("\\WIN2K3\IMAGES\8000\8029.JPG")

End Sub

Request Pls help ASAP

Thankyou




--

Dave Peterson


--

Dave Peterson