I have a bunch of pictures in a workbook - screen shots that I copied in. I also have a bunch of lines that I drew using "shapes" on "insert" menu. I need to be able to compress the images that I pasted in. Is it possible to select all the pictures the workbook contains all at once using VBA? I only need the pictures selected, not any other shapes that may appear in the workbook.