Putting a Shape (Rectangle) embedded in worksheet to show on a Userform

Hi - I hope this is a simple query? Bear with me.....

I have a worksheet that produces scanable barcodes and a Shape which references the Cell with that Barcode.

I would like to put the Barcode Image (The Shape) into a userform so when the cell value changes and the Userform is activated the image of the barcode in the shape updates. Hope that makes sense. The only code I have is....

Please Login or Register  to view this content.

But I have no idea which Control Box from the Toolbox to use, or the VBA to display it in the userform. Hope someone can assist

Many thanks
Hans

Hi - Thanks for your reply.....

You are right, I do need to scan the barcode from the screen, and I have of course tested our screen resolutions to ensure they can be scanned, which they do. For ease of use in the tool I am developing I want the user to be able to scan scan the barcode directly from the user form on the screen. I'm sure there is a clunky work-a-round but it would be great to get this functionality working. I am restricted with any additional add-ins as I do not have Administrator rights.

A mock up of what I am looking for is attached here.

Hope someone can still help?

Regards
Hans

Image8.jpg

Hi there - Unfortunately the format of the Cell is an embedded BARCODE FONT into the Workbook (Administrator Rights Issues) so the cell content is Text and then formatted as a Barcode Font.

This is the result when you reference the cell into the Label in the Userform. It returns the TEXT rather than the Black and White Barcode

I'm still searching for a solution !

Any Ideas?

Regards Hans


Image1.jpg

I think I have found a WORK-AROUND

1. Create another Cell in the Worksheet with the Barcode in it and size that cell Font to 72pt

2. Run the VBA to Copy that cell and save it as a JPEG Image to the Desktop.

Code to copy selected cells and save as JPEG

Please Login or Register  to view this content.

3. When the UserForm is initialised run the VBA to create a Dynamic Image into the UserForm (Set the code to Size both the imported Image and its position into that code).

Code to create 'Dynamic Image' (with your saved JPG) into the UserForm and position it appropriately

Please Login or Register  to view this content.

The result is shown below

Image32.jpg

Thanks
Hans