troubleshooting Question
Looping Through a Excel Folder Directory to Delete Shapes
I need to loop through a folder of excel files and delete the drawing objects on specified sheets within each workbook.. I have found the following code to delete
shapes on an active worksheet,
Sub DeleteShapes()
Dim Shp As Shape
For Each Shp In ActiveSheet.Shapes
Shp.Delete
Next Shp
End Sub
but I need to loop through an entire directory of excel files and delete the shapes on two specified named tabs. Each file has the same two named tabs. Is there a way to automate this process? I cannot get the workbook open Method to work without an error.
Thanks!
shapes on an active worksheet,
Sub DeleteShapes()
Dim Shp As Shape
For Each Shp In ActiveSheet.Shapes
Shp.Delete
Next Shp
End Sub
but I need to loop through an entire directory of excel files and delete the shapes on two specified named tabs. Each file has the same two named tabs. Is there a way to automate this process? I cannot get the workbook open Method to work without an error.
Thanks!
Join the community to see this answer!
Join our exclusive community to see this answer & millions of others.
Unlock 1 Answer and 2 Comments.
Learn from the best
Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.
Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 2 Comments.
Try for 7 days”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.