Buster, sorry I forgot to explain that you need to set some VBA Editor Library References, go to the VBA Editor>Main Menu>Tools>References and ensure that the ones shown in the Excel sheet "References" in the Zip I attached are ticked.
The one that is showing the details on the excel sheet is the one giving you the problem, if you don't want to know the photo's File name (you already get the full path) then you can delete this part of the code -
Set fs = CreateObject("Scripting.FileSystemObject")
and
Me.Document_Name = fs.GetFileName(Me.Document_Location)