[已解决]批量删除工作簿中每张sheet的控件对象

wengrobert

各位老师：
   请问如何批量删除工作簿中每张sheet的控件对象。如附件。谢谢！

最佳答案

月排行榜 / 总排行榜

cutecpu

2021-5-18 15:31

Sub demo()

For Each sh In ThisWorkbook.Worksheets
      For Each obj In sh.OLEObjects
         obj.Delete
      Next
Next

End Sub

祝順心，南無阿彌陀佛！

跳转到最佳答案楼层

cutecpu

Sub demo()

For Each sh In ThisWorkbook.Worksheets
      For Each obj In sh.OLEObjects
         obj.Delete
      Next
Next

End Sub

祝順心，南無阿彌陀佛！