Quote Originally Posted by macropod View Post 
For x = 1 to 199
   ActiveDocument.Shapes("Picture" & x).Delete
Next
Yes, that worked perfectly. It's highlighted a different problem (for me) but the code worked like a charm. Thank you, I really appreciate it