Image Lookup from Folder

HTML Code: 

Refer link will help you.

The link above from @avk inserts images in a cell without VBA and looks up images already embedded in the workbook
This method inserts images using VBA and looks up those images in a folder dynamically
Both methods work well

1. Add an extra image in your folder with name DefaultImage.jpg
- this is the image used if filename in cell C4 does not exist
- prevents the code failing

2. Insert the code below in the sheet's module
- right-click on sheet tab
- select View Code
- paste code below into code window
- {Alt}{F11} to return to Excel

3. Save as macro enabled workbook

4. Test
- amend the value in B4 (which drives formula in C4)
- the image in cell E2 changes whenever value in C4 changes

5. 10002 in cell B4 creates this path : C:\Users\raja\Pictures\Empl Photos\Raj -10002.jpg

Please Login or Register  to view this content.

How can anyone check anything when all you tell them is "that's not working"?

More detailed information, please.

• Does the code run?
• Does it run but do nothing?
• Does it produce error messages? If so, what do the messages say?
• Does it produce unexpected/wrong results? If so, how do the results differ from what you expect?
• Does it hang?

You have not posted the workbook with the code pasted from post #3. You will need to do so if you want help troubleshooting this.

@ Raj.xls
- I attached a workbook which contain the code
Have you opened the workbook and tested it?

I explain clearly, 1st kev create a code and attach i tried its showing debug in this line Set Pic = ActiveSheet.Pictures.Insert(FullPath).
And i copied that and paste in my main workbook and run the macro previous macro not run (C3. clear-content ) this line . That's why i attached My Main Workbook.


Attachment #9

I think I made a small mistake

Please Login or Register  to view this content.

should be

Please Login or Register  to view this content.

Hi Kev,

Thanks for Reply. That's working really you are great.

One small request,
My actual purpose this workbook is empl login entry, already i have one macro in same sheet for capture (id, name & Login time)
And added your macro & run its showing a popup (ambiguous name detected: worksheet change)

attached Main workbook

how i can run both the macros in same worksheet.. please guide me.

Try combining the 2 macros like this

Please Login or Register  to view this content.

You do not need to do this but (to be consistent) consider..
EITHER amending

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

OR amending

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

Is procedure InsertPic still in your code? (looks like VBA cannot find it)

If you cannot fix it then post your code for me to check
Use code tags - click on # icon (above post window) and paste code between the tags
[ CODE] paste code here [/CODE]

@Raj.xls

For information : Option Explicit
- Option Explicit is placed at the TOP of the module (before any procedures)
- it forces you to always declare variables

Your questions
You were given code, you tested it, it worked. You then asked for 2 bits of code to be combined
Why did you not do what I suggested in post#14? instead of adding extra precudures?

It should work using post#14 version of Worksheet_Change
- test with only Worksheet_Change and InsertPic procedures in the module
- if it does not work, post that code and I will look at it for you

This is all you should have in the module

Please Login or Register  to view this content.