Get picture from folder that contains what is in the corelating cell

Hello All,

The code that I have been using for production reports takes the entire name of a part and pulls the picture based on the entire name. The issue with this is that some pictures are named inconsistently.

I was hoping for a macro that can pull a .jpg file that contains a piece of the number before the right-most dash.

ISSUE - There is multiple files that contain the number before the right-most dash.

Example:

I want to pull a picture that contains A1234 in it...

there are pictures in the folder labeled A1234-01 , A1234-02 , A1234-01_A etc.

It really doesn't matter which one it picks out of that group.

You could try this

Please Login or Register  to view this content.

The input box is an interesting idea, but I was hoping for something alittle more automated as the production report has about 300 parts in it.

Attached is an example of what it may look like. The "Reduced TO" column is what I want it to pull from. The code I have been messing with sends me errors because of what I believe to be is too many options to pick from. (eg. A1000 could be picked as A1000-01,A1000-02 etc.) I am not sure how to pull a generalized file from a folder and have been lurking the internet for answers lmao.

Thanks for the reply Jolivanes. Yes column B is where the abbreviated version is created from column A. I do also want to select column B's abbreviated name and bring up the picture in column C. All files are .jpg. Im fairly sure that spacing is not the issue.

What I am wondering is if the issue is that my picture folder has multiple options for the abbreviated name. Could you run a trial with that possibility also?

Example:

Abbreviated is A1000
Pictures in folder: A1000-01 , A1000-02 , A1000-02_A

Re: "What I am wondering is if the issue is that my picture folder has multiple options for the abbreviated name". What does this mean?
And yes, I ran it with three same names except the last digit. Picked the first one in the folder.

So I am not getting an error but no pictures are populating.

Try this attachment.
BTW, you did not have a backslash after "epicore" in your code in the attachment.

Awesome jolivanes,

These userforms are super cool. Is there a way to make it do multiple at once instead of individually?

Like I asked before, explain properly.
"multiple at once" means what? Multiple different selections in Column B or multiple selections in the UserForm ListBox?

Sorry, I mean multiple values in column B. B2 is A1000 B3 is 600-000 etc.

What is meant to be the end result?
Do you want to go through the column and place pictures from each selection somewhere?

End goal is that the macro runs and takes the abbreviated version from column B and places a picture into Column C in the same row beside it.

No manipulation of the picture required once when placed in the cell beside the name?
Mock up a representative attachment with not just 3 cells.
It should show the sheet before the macro is run and after the macro is finished.

Okay, This is what I got. Sheet 1 is before and sheet 2 is after. Note picture 3 is shown twice because they have the same abbreviation.

Is the attachment a true copy of your original as asked for?

If your attachment is a true copy, with the filenames in Column A of Sheet2, this should do it.

Please Login or Register  to view this content.

The attached has 2 possibilities for you to play with.
One with the abbreviations in a separate sheet and one with the abbreviations in the "Master" sheet. (= Sheet2 in the attachment)

Wow I am blown away. This is amazing!!

The maybe so macro doesn't really apply to my application but the sheet 2 one nails it!!!

The only is I am having as you can see attached is it duplicates it below. I only filled out from A3 to B6 btw.

Did you clear the sheet before you ran it a 2nd time?

Yes, it is clearing the abbreviations column which is fine but it then copies those four values and brings the part number and pictures also.

Do I read you right.
It does not clear everything just entered, Column A, B and Pictures in Column C?
I put the "Undo Maybe So Result" button in for myself to test. But if you want it, I'll have to change the code behind it.

I am only using the Sheet 2 button. I have attached two images, the first being before I click and the second being after clicked. I am not sure why it is duplicating as shown.

If this still stands (from Post #1)
"It really doesn't matter which one it picks out of that group."
Then change this

Please Login or Register  to view this content.

to this

Please Login or Register  to view this content.

or just add "Do" and a space in front of "While", add "Exit Do" as a line before the "End If" statement and change "Wend" to "Loop"

That unfortunately did not resolve the issue. Also the "doesn't matter which one out of abbreviated group" does still apply yes.

I can't replicate your problem.
With the changes from Post #26, in the Workbook here, your attachment from Post #15, it only shows a picture for each entry in the Abbreviations column.
Do you start out with an empty workbook and only put the abbreviations in?

No I put in the Part number and the Abbreviations before running the code, should I not?

Does that not defeat the purpose?
Only put in the abbreviated file name and see what happens.
As I understand your Post #1, you have part of a file name and want to find a file with it's name starting with that part of the file name.
If you're going to use the whole file name, no need to worry about finding that name through a part of it.

right, so the purpose of this list is to have the part numbers that we are currently working on in this list with the full name (ex.1234-01). I also have a picture beside it so it is easily recognizable. The difference between 1234-01 and 1234-02 is very little and is barley noticeable in a picture. This is where the abbreviations come in.

In sort, Final product i will be hiding the abbreviated column at the end. I use a seperate macro to fill Column A with the full part name of the parts we are working on. If in this macro it could pull the abbreviated version into Column B based on Column A then pull the picture based on Column B that is end goal.