18、探索VBA编程：图表操作与速度优化及简单对话框使用

探索VBA编程：图表操作与速度优化及简单对话框使用

1. VBA编程中的图表操作

在VBA编程里，图表操作是一项重要内容，但也颇具挑战。比如在Excel 2007中，录制宏时会忽略一些新的图表格式化命令，不过Excel 2010解决了这个问题。

1.1 创建图表

下面是一个录制的创建基本柱状图的宏代码：

Sub Macro1()
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlColumnClustered
    ActiveChart.SetSourceData Source:=Range _
       ("'Sheet1'!$A$1:$A$3")
    ActiveChart.Legend.Select
    Selection.Delete
    ActiveSheet.ChartObjects("Chart 1").Activate
    ActiveChart.SeriesCollection(1).Select
    Selection.Format.Shadow.Type = msoShadow21
End Sub

不过这个宏存在问题，它硬编码了图表名称和数据范围，可能会导致错误。下面是一个手动编写的从选定范围创建图表的宏：

Sub CreateAChart()
    Dim ChartData As Range
    Dim ChartShape As Shape