Hi Bruce,

You may at some stage want all of the pictures on sheet5 to be visible
so that you can make any adjustments. When that time arrives just run
the following macro from the sheet with all the pics.

Public Sub showall()
Dim shp As Shape
For Each shp In ActiveSheet.Shapes
shp.Visible = True
Next shp
End Sub

Just copy/paste the code into a standard module by going Copy the
codeactivate workbookAlt + F11 to get to VBA
EditorInsertModulePaste the code into the new module.

Ken Johnson