export images from excel to folder with Id number as a name of picture

[arshab]

I have and excel file. in sheet1 column A is serial number column B is ID Number, Column C is image of a person, and column D is Name, now I want to export photograph to C/temp in jpg format, in the place of name i need there ID number wich is in column B, in vba, there are more then 1000 rows , pls help

 

[John_w]

Try my code without the If and End If lines.

 

[arshab]

it worked
wow trying to solve this from so many years, then i tried mrexcel, and bro you sove my problem thanx a lot

 

[arshab]

One more favor, resolution of pics are very low only 8 kb, can u increase resulation

 

[John_w]

Is the resolution lower than when you save an image manually?

Try changing

    saveObject.CopyPicture xlScreen, xlPicture

to

    saveObject.CopyPicture xlScreen, xlBitMap

but I doubt it will make a difference, because you can't increase the resolution higher than the original.

 

[arshab]

hi now I have almost 5000 jpg images, ID Number as a name in C:\Temp, I want to some code that if i write id number image automataclly appear, so the excel file does not get heavy and lanthy

 

[John_w]

With a few changes (sheet names and ranges) the code at https://www.mrexcel.com/forum/excel...e-specified-cell-post5018165.html#post5018165 (which is written for that specific question) should work for you.