I would think it should be possible although you must have a very large number of images in your excel file if its taking that long to get them. It should only take a matter of seconds. You would need to amend the original code to get a range instead of just from a worksheet. You will need to add in range as an input and the part of the code getting the images would need to change to something like below. Note my_range is just the example input name.
For Each image In wb.Worksheets(Worksheet).Range(my_range).ShapesTable.Rows.Add(image.Name)Next------------------------------
Michael ONeil
Technical Lead developer
Everis Consultancy
Europe/London
------------------------------
#MVP