Vba Excel Addpicture code needs to updated Insert not working

If you are selecting multiple files, then the variant array returned needs to by used element by element. What do you get if you look at the variable's current value when it is used?

Msgbox "Current value is " & sFileToOpen
Set pic = .Parent.Pictures.Insert(sFileToOpen)



But try a simplified version:

Please Login or Register  to view this content.