Thanks a bunch. Works perfectly!!!!!! You made my day!
"Tom Ogilvy" wrote:
Me was particular to the userform which I was using to illustrate that this
is the correct construct.
in your case, I assume Image1 is on the worksheet worksheets("Coverpage")
so replace
'Image1.Picture = LoadPicture(PictureFileName1)
with
Worksheets("CoverPage").Image1.Picture = _
LoadPicture(PictureFileName1)
or qualify it with a reference to the sheet on which it is located.
--
Regards,
Tom Ogilvy
"Troubled User" wrote in message
...
Tom, Here is the entire code. I got invalid use of the Me keyword using
your
suggestion, so based on what was written by Leith I tried simply
'Image1.Picture = LoadPicture(PictureFileName1) and got a Object required
error.
Any help is appreciated. Thank you.
WB
Sub NewInserttoImageBox()
Dim PictureFileName1 As Variant
Set PictureFileName1 = Worksheets("PropertyList").Range("J3")
Application.ScreenUpdating = False
Worksheets("CoverPage").Select
'Me.Image1.Picture = LoadPicture(PictureFileName1)
'This returned Invalid Use of Me Keyword
'Image1.Picture = LoadPicture(PictureFileName1)
'Returns Runtime Error 424 - Object Required
Worksheets("Input").Select
Application.ScreenUpdating = True
"Tom Ogilvy" wrote:
Private Sub UserForm_Initialize()
Me.Image1.Picture = LoadPicture("c:\images.jpg")
End Sub
worked fine for me. Using a variable to hold "C:\Imgages.jpg" would
work as
well.
--
Regards,
Tom Ogilvy
"Troubled User" wrote in
message
...
I have named a file path and file location in VB to locate a
particular
photo. As the user selects different items from a droplist the file
path
and
name change. In the change event on that droplist I need to know how
to
call
the load event for the Image object. So far I have tried:
Image1.Picture = LoadPicture(PictureFileName1) - Where PictureFileName
is
my
path and file name as well as hard coding to
Image1.Picture = LoadPicture("e:\monthlyreport\Photo1.bmp")
I don't understand the correct syntax to change the picture file.
Please help. Thank you!