Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/25.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 删除工作表中的所有图表。错误处理_Excel_Vba - Fatal编程技术网

Excel 删除工作表中的所有图表。错误处理

Excel 删除工作表中的所有图表。错误处理,excel,vba,Excel,Vba,我正在使用 Worksheets("Treatment failures - Graph").ChartObjects.Delete 删除工作表中的所有图表。我的问题是,当工作表中没有图表时,我不知道如何处理此错误。您只需添加一个检查,查看工作表中是否有图表 与工作表(“治疗失败-图形”)。图表对象 如果.Count>0,则 .删除 如果结束 以 您只需添加一个检查,查看工作表上是否有图表 与工作表(“治疗失败-图形”)。图表对象 如果.Count>0,则 .删除 如果结束

我正在使用

Worksheets("Treatment failures - Graph").ChartObjects.Delete

删除工作表中的所有图表。我的问题是,当工作表中没有图表时,我不知道如何处理此错误。

您只需添加一个检查,查看工作表中是否有图表

与工作表(“治疗失败-图形”)。图表对象
如果.Count>0,则
.删除
如果结束
以

您只需添加一个检查,查看工作表上是否有图表

与工作表(“治疗失败-图形”)。图表对象
如果.Count>0,则
.删除
如果结束
以

另一种方法是忽略此错误:

With Worksheets("Treatment failures - Graph")
    On Error Resume Next
    .ChartObjects.Delete
    On Error GoTo 0
End With

另一种方法是忽略此错误:

With Worksheets("Treatment failures - Graph")
    On Error Resume Next
    .ChartObjects.Delete
    On Error GoTo 0
End With

我不建议这样做,因为它忽略了所有错误。工作表上没有图表,或者工作表根本不存在。@DarrenBartrup Cook你说得对。更正了代码我不建议这样做,因为它忽略了所有错误。工作表上没有图表,或者工作表根本不存在。@DarrenBartrup Cook你说得对。更正了代码