I have been using this macro to erase all the "tickmarks" shapes on the worksheet. It doesn't weem to be working after the change over to Excel 2010. What changed?
Dim iResult As Integer
iResult = MsgBox("Do You Want to Delete Pictures and Tick Marks on this Worksheet", vbYesNo, "OK to Delete ? This CANNOT be undone")
If iResult = 7 Then Exit Sub
Dim oShape As Excel.Shape
For Each oShape In ActiveSheet.Shapes
If oShape.Type = msoPicture Then