1. maybe it explain something, maybe not
https://www.add-ins.com/support/micr...-error-400.htm
2. You should not use word 'index' because 'Index' is a reserved word (vba property, number for an object in the collection, e.g. for Window, Worksheet, ListColumn, ListRow, PivotFormula, etc.)
3. Try alternative constructions:
or
You may have other objects from the same collection of 'Shapes' in your worksheet - pictures belong to this collection, so you should check their type:
4. Use 'Set Pic = Nothing' at the end of assigning object variables
Bookmarks