How to get a range as a picture on a userform

[MHD]

Hi

I have a range that I need to show on a user form, but I DO NOT want to use a list box. I want the range on the user form to look exactly like the original range on the sheet.

Anyone know the VBA to do this?



The range: sheets ("Invoice_Labor").range("A1:F35")
user form name: UserForm1
Command Button name: CB_Apply

Thanks

 

[rlv01]

The code works great
Thank you very much for the interaction

But I am still having a problem
The size of the image that the code has inserted does not correspond to the size of the image area in the user form.
Can we make the code automatically resize the image entered into the user's form?

Is there a solution for that, please

You can do all sorts of things with the imported image, but it requires experimentation on your part. The image control has several properties that control how the image is displayed. For example, the sample code I posted has this

    UserForm1.Image1.AutoSize = True

If you set it to 'False' the image will display differently. There are also the PictureAlignment, PictureSizeMode, and PictureTiling properties that you can experiment with.