Load picture from worksheet into ActiveX Controls Image

[Axmed.cm]

Dear All

I was trying to load a 'picture 1' from my worksheet to 'Image1' in activeX Controls.

I tried this code but not working

Private Sub CommandButton1_Click()

    Me.Image1.Picture = ActiveSheet.Shapes.Range(Array("Picture 1"))

End Sub

Could anyone help on this?

Thanks
Ahmed