Replacing an OLE picture's picture property

B

bdcrisp

I've been designing a catalog for my home movies. When the user uses a
dropdown down menu, selects the title, it reads a synopsis and image
name to display for that movie. Its an OLE picture object , but each
time a new movie is selected, the code inserts another image (doesn't
replace the existing image). My problem is that I can't figure out how
to access the .picture property of the OLE object.
 
S

Stephen Bullen

Hi Bdcrisp,
I've been designing a catalog for my home movies. When the user uses a
dropdown down menu, selects the title, it reads a synopsis and image
name to display for that movie. Its an OLE picture object , but each
time a new movie is selected, the code inserts another image (doesn't
replace the existing image). My problem is that I can't figure out how
to access the .picture property of the OLE object.
Click to expand...

I'd guess it's the OLEObject.Object.Picture that you're looking for.

Regards

Stephen Bullen
Microsoft MVP - Excel
www.BMSLtd.co.uk

For the most timely access to the newsgroups, use Outlook Express to
connect to msnews.microsoft.com
 
S

Stephen Bullen

Hi Bdcrisp,
is this question too vague?
Click to expand...

No, but while the response time from the volunteers in the newsgroups
is usually very good, it's customary to wait more than and hour and a
half before asking again <g>.

Regards

Stephen Bullen
Microsoft MVP - Excel
www.BMSLtd.co.uk

For the most timely access to the newsgroups, use Outlook Express to
connect to msnews.microsoft.com
 
B

bdcrisp

Im not a VB guru, so im trying to figure this out. I have an active
image control on Sheet(1) named moviepic

i want to update the picture of this control

i tried:
Sheets(1).moviepic.Picture = "c:\moviepic.jpg"

and serveral other ways with no luck.
id appreciate your experitis
 
S

Stephen Bullen

Hi Bdcrisp,
Im not a VB guru, so im trying to figure this out. I have an activeX
image control on Sheet(1) named moviepic

i want to update the picture of this control

i tried:
Sheets(1).moviepic.Picture = "c:\moviepic.jpg"

and serveral other ways with no luck.
id appreciate your experitise
Click to expand...

Sheet1.moviepic.Picture = LoadPicture("c:\moviepic.jpg")


Regards

Stephen Bullen
Microsoft MVP - Excel
www.BMSLtd.co.uk

For the most timely access to the newsgroups, use Outlook Express to
connect to msnews.microsoft.com.
 
B

bdcrisp

Oh, wonderful it works. Thank you so much for your help.

(this is the first real programming ive done since qbasic )
 
Top