This code will do the same as your manual steps

Sub FixPicture()
'
' Macro1 Macro
' Macro recorded 8/7/2009 by Joel
'
For Each shp In ActiveSheet.Shapes
shp.Placement = xlMove
shp.Height = 0.6

Next shp

End Sub

"Lis" wrote:

I have created for a client a Reporting Services report that includes images.
When I export the report from Reporting Services into Excel 2003 and then
sort, the images sort along with the data. However, in Excel 2007, the
images do not sort. I have created some instructions for the client on what
to do in order to get the images to sort, but the client is not happy. What
is different from 2007 to 2003? Does anyone have any suggestions that can
allow the exported Reporting Services report to sort images in Excel 2007
right out of the box?

Here is what I have to do now to get them to sort. 9 steps is a bit
daunting to the client:

1. Click on any one of the images.
2. Hit Ctrl-Shift-Spacebar on your keyboard. This will select all of the
images.
3. Right-click on one of the images and choose €œSize and Properties€�
4. Click on the Properties Tab
5. Choose €œMove but Dont Size With Cells€�
6. Click on the Size Tab
7. Under €œSize and Rotate€�, change Height from 0.7€� to 0.6€�. You can do
this by clicking once on the down arrow next to the size.
8. Click the close button
9. Click into the Mark Column
10. On the toolbar, choose Data
11. You can now sort and the images will sort with the data.


Thanks in advance for any help.