在Excel VBA中生成图表程序，可以通过以下步骤实现：
打开VBA编辑器
按下 `Alt + F11` 打开VBA编辑器。
插入模块
在VBA编辑器中，插入一个新的模块（就像新建一个Word文档一样）。
编写代码
在模块中输入以下代码示例，该代码将创建一个柱状图并设置其标题和数据源：
```vba
Sub 自动生成图表（）
Dim MyChart As Chart
Dim DataRange As Range
' 设置数据区域
Set DataRange = ThisWorkbook.Sheets（"Sheet1"）.Range（"A1:B10"） ' 请修改Sheet1和A1:B10为你实际的数据区域
' 创建图表
Set MyChart = Charts.Add
' 设置图表类型
MyChart.ChartType = xlColumnClustered ' 柱状图，可以根据需要修改
' 设置图表数据源
MyChart.SetSourceData Source:=DataRange
' 设置图表标题
MyChart.ChartTitle.Text = "销售数据图表" ' 可以修改为你想要的标题
' 设置图表位置和大小
MyChart.Location Where:=xlLocationAsObject, Name:=“Sheet1” ' 将图表放在Sheet1
' 设置图表区域
With MyChart.ChartArea
.Left = 0
.Top = 0
.Width = 600
.Height = 400
End With
End Sub
```
运行代码
按下 `F5` 运行代码，或者关闭VBA编辑器并重新打开Excel，然后在“开发工具”选项卡中选择“宏”，找到并运行你的宏。
建议
数据区域：确保你设置的数据区域是正确的，以便生成的图表能够反映实际数据。
图表类型：根据需要选择合适的图表类型，Excel VBA提供了多种图表类型供选择。
图表位置和大小：根据工作表的大小和布局，调整图表的位置和大小，以便更好地展示数据。
通过以上步骤，你就可以在Excel VBA中生成一个简单的图表程序。如果需要更复杂的图表或更多的自定义选项，可以进一步探索VBA的图表对象和方法。
