changing the Icon on a custom command Button

[spgreen]

Hi all,

As is says in the title how do you go about changing the default icon (smiley face) to another icon using vba. I've tried recording the action but nothing comes up.

thanks in advance

Simon

 

[Rodie]

Hi ...

In the properties of you command button, you have a field "Picture". Choose your picture from it. Is it what you wanted ?

Rodie

 

[spgreen]

thats what i want to do, but i want to change the picture using VBA not by doing it manually

 

[Molby]

Taken from the help files:

'Note: Be sure to refer to a bitmap file that is
'present on your system, and to include the path
'in the filename.
CommandButton1.Picture = _
LoadPicture("c:\windows\argyle.bmp")
CommandButton1.PicturePosition = ComboBox1.Value
End Sub

 

[Rodie]

... Or, if you don't know the entire path of you picture, you can use this :

ThisWorkbook.Path & "\folder_name..."

Rodie.