如何检查Excel表格上是否有表格
我必须做一个VBAmacros来检查是否有一个图表已经出现在Excel表格。 所以，如果有任何图表，我必须删除它，如果没有，我必须把一个新的图表。
我尝试使用： Worksheets("Sheet.Name").ChartObjects.Delete直接，但如果图表不存在的工作表，它给了一个错误。
我也尝试使用ThisWorkbook.Charts.Count但它始终显示，我的工作簿中有0个图表，即使在第一个工作表本身有2个图表。
请帮忙。 谢谢 ：）
尝试循环查看工作表中的所有ChartObjects ，并删除它们中的每一个（如果存在）。
码：
Option Explicit Sub CheckCharts() Dim ChtObj As ChartObject For Each ChtObj In Worksheets("Sheet1").ChartObjects '<-- modify "Sheet1" with your sheet's name ChtObj.Delete Next ChtObj End Sub