1、 如图所示，想要用VBA程序控制对表中数据生成饼状图
2、 点击“开发工具”
3、 点击“Visual Basic”
4、 双击“sheet3”,弹出右侧的对话框
5、 点击下拉菜单，选择“worksheet”
6、 点击下拉菜单，选择“BeforeDoubleClick”
7、 在程序中输入
Charts.Add ActiveChart.ChartType = xlPie ActiveChart.SetSourceData Source:=Sheets("Sheet3").Range("A1:B4")
8、 点击“保存”
9、 双击任一行数据
10、 这样就自动生成了饼状图了
