extract IPTC data from JPG images with VBA

Question

I\'ve just created a button on excel that allows me to select a folder and display the name of the files it contains.

Sub extract_IPTC_From_Folder()
On Error