i am trying to create a custom icon for a custom control
button. I have gone through all of the knowledgebase
articles about how to do this and have copied the code
into my module but I always get to the part where it tell
me to put the image into the clipboard by using the
Clipboard.SetData command. Well, it never works, I have
tried:

Dim MyIcon as StdPicture
Set MyIcon = LoadPicture("C:\someiconfile")
Clipboard.SetData MyIcon

the LoadPicture seems to work but when I get to the
Clipboard line it tells me "Object Required". I have tried
all of the variations I can think of
Cliboard.SetData MyIcon, 2
MyIcon.PutInClipboard

Nothing seems to work. Any ideas?

From there I think it will be pretty easy to do a
PasteFace onto the control button.

thanks,
jonathan

Jonathan,

I load the pictures onto a hidden worksheet, and then just use the PasteFace
method to get them by name. Far easier than all that you are going through.

--

HTH

Bob Phillips

"Jonathan Crow" wrote in message
...
i am trying to create a custom icon for a custom control
button. I have gone through all of the knowledgebase
articles about how to do this and have copied the code
into my module but I always get to the part where it tell
me to put the image into the clipboard by using the
Clipboard.SetData command. Well, it never works, I have
tried:

Dim MyIcon as StdPicture
Set MyIcon = LoadPicture("C:\someiconfile")
Clipboard.SetData MyIcon

the LoadPicture seems to work but when I get to the
Clipboard line it tells me "Object Required". I have tried
all of the variations I can think of
Cliboard.SetData MyIcon, 2
MyIcon.PutInClipboard

Nothing seems to work. Any ideas?

From there I think it will be pretty easy to do a
PasteFace onto the control button.

thanks,
jonathan

Turn on the macro recorder while you do Insert=Picture in the menu to get
your picture on the worksheet. Then select the picture and do Edit=Copy.
That gets it on the clipboard. Now you can do customize, select the button
and do PasteFace. Turn off the macro recorder.

Just to add a little more detail.

--
Regards,
Tom Ogilvy

Bob Phillips wrote in message
...
Jonathan,

I load the pictures onto a hidden worksheet, and then just use the
PasteFace
method to get them by name. Far easier than all that you are going
through.

--

HTH

Bob Phillips

"Jonathan Crow" wrote in message
...
i am trying to create a custom icon for a custom control
button. I have gone through all of the knowledgebase
articles about how to do this and have copied the code
into my module but I always get to the part where it tell
me to put the image into the clipboard by using the
Clipboard.SetData command. Well, it never works, I have
tried:

Dim MyIcon as StdPicture
Set MyIcon = LoadPicture("C:\someiconfile")
Clipboard.SetData MyIcon

the LoadPicture seems to work but when I get to the
Clipboard line it tells me "Object Required". I have tried
all of the variations I can think of
Cliboard.SetData MyIcon, 2
MyIcon.PutInClipboard

Nothing seems to work. Any ideas?

From there I think it will be pretty easy to do a
PasteFace onto the control button.

thanks,
jonathan