今天继续讲讲VBA图表的相关操作
一、在图表工作表上创建图表(看起来有点拗口,也就是在Chart上创建一个图表)
插入图表的方式:打开工作簿后,对着sheet点一下右键——插入——选择图表。
①昨天主要是讲了VBA创建在sheet上面的图表,如果单独在Chart上创建图表的话,用Charts的add2方法就可以了:
Charts.Add2
②创建完了如果需要引用数据的话,可以和昨天一样引用数据:
Sub demo()
Dim myChart As Chart
Set myChart = Charts.Add2
myChart.SetSourceData Source:=Sheets("Sheet1").Range("A1").CurrentRegion
myChart.ChartType = xlColumnClustered
End Sub
需要注意的是,上述在引用数据源的时候,我是用的Sheets("Sheet1"),而不是常用的Sheets(1),这是因为新建了myChart后呢,它是自动往前面插入的,Sheets(1)就变成了图表,而不是原来的数据的那张表。
③如果先将区域值内的值赋值,再新建Chart就不用担心Sheet(1)引用不到了,可以这样写:
Sub demo()
Dim my