How to embed picture on command button

[angsuman]

Hello All,


I have one userform and I am adding textbox and commandbuttons dynamically to it. Now I want to embed not link a picture on one command button so that picture appears on command button even if picture file is not in its location. I tried creating one userform and adding picture to image control. I used following code after that. It did not work. Need your help to achieve this.

         With PiBtn
            .Top = TxtBoxTopPos
            .Height = HeightLen * 2
            .Width = CalBtnWidth
            .Left = UformWdth - CalMrgn - CalBtnWidth
            .BackColor = &H8000000F
            .ForeColor = &H80000012
            .Font.Name = "Arial"
            .Font.Size = 9
            .Picture = LoadPicture(PicForm.Image1.Picture)
		End	With

Thanks
Angsuman

 

[pgc01]

Hi

You use LoadPicture() to load a picture from a file.

In this case try instead

With PiBtn
    .Picture = PicForm.Image1.Picture

 

[Logit]

.
If you use an ActiveX button instead of a CommandButton, you will be able to display an image.

 

[angsuman]

Thank you Logit for your response. I used your suggestion. First I created an user form as supporting user form with picture frame and then added the picture to it. In working user form, I referred to the supporting user form using your suggestion. Thanks for your help.

 

[Logit]

You are welcome.