Question

如何用VB代码删除一个Excel中的一个图表。

如题，如何用VB6控制Excel删除一个已存在的图表？比如以此Excel数据得出的一个线性表格。

Answer 1

EXCEL中的图表，你鼠标点上去，左上角会有一个地方显示图表的名称，比如“图表 2”这样。假设图表在EXCEL的第一个表中，名称叫“图表 2”，那么：
Sheet1.Shapes("图表 2").Delete

Answer 2

Private Sub CommandButton1_Click()
Application.DisplayAlerts = False
ActiveWorkbook.Charts("Chart2").Delete '删除chart图表
'ActiveWorkbook.Sheets("Sheet3").Delete '删除sheet表
Application.DisplayAlerts = True
End Sub