在VBA中制作图表可以帮助我们更好地展示和分析数据。本文将介绍如何使用VBA添加和删除图表的步骤。

1. 添加图表：

步骤1：打开Excel并创建一个新的工作簿。

步骤2：在工作表中输入一些数据，以便后续创建图表。例如，在A1单元格中输入“月份”，在B1单元格中输入“销售额”。

步骤3：选择要创建图表的数据范围。例如，选择A1:B13的范围。

步骤4：在菜单栏中点击“插入”选项卡，然后选择“图表”按钮。这将打开图表工具栏。

步骤5：在图表工具栏中选择所需的图表类型，例如柱状图或折线图。

步骤6：在图表工具栏中点击“确定”按钮。这将在工作表中创建一个新的图表。

步骤7：在VBA编辑器中打开新的代码模块。

步骤8：在代码模块中输入以下代码以引用新创建的图表对象：

```vba

Dim chartObj As ChartObject

Set chartObj = Worksheets("Sheet1").ChartObjects(1)

```

步骤9：您可以使用这个引用来进一步操作图表，例如更改图表标题、添加数据系列等。

2. 删除图表：

步骤1：打开Excel并打开包含图表的工作簿。

步骤2：在VBA编辑器中打开代码模块。

步骤3：在代码模块中输入以下代码以删除图表：

```vba

Dim chartObj As ChartObject

Set chartObj = Worksheets("Sheet1").ChartObjects(1)

chartObj.Delete

```

步骤4：保存并关闭VBA编辑器。

步骤5：执行代码以删除图表。

使用VBA可以轻松地添加和删除图表，从而使数据更直观和易于理解。通过按照上述步骤进行操作，您可以自定义和管理图表，以满足您的需求。