This will help you find every shape on a sheet. Replace the code to delete with your code.
[VBA]Dim Shp As Shape
For Each Shp In ActiveSheet.Shapes
Shp.Delete
Next[/VBA]
This will help you find every shape on a sheet. Replace the code to delete with your code.
[VBA]Dim Shp As Shape
For Each Shp In ActiveSheet.Shapes
Shp.Delete
Next[/VBA]
Steve
"Nearly all men can stand adversity, but if you want to test a man's character, give him power."
-Abraham Lincoln
Posting Permissions
Reply With Quote