If there is a way, I'm not aware of it.

But you can select all the pictures and do it at once, instead of one
at a time...

1. Open up the "Drawing" toolbar
2. Click on the "Select Multiple Objects" icon
3. Click "Select All" and "OK"
4. Do what we did before on one of the selected objects (i.e. left click, ...)

Or you could write a VBA routine to do it. Something like:

For Each oShape In ActiveSheet.Shapes
oShape.Placement = xlMoveAndSize
Next oShape