VB调用Excel在Excel中生成图表
如图,我生成的图表是使用(B19:F20)的区域,就是横轴应该显示的“90以上,80~90,...”这几个分数段的。不知道为什么显示不了,请教各位,我的代码如下:newC...
如图,我生成的图表是使用(B19:F20)的区域,就是横轴应该显示的“90以上,80~90,...”这几个分数段的。不知道为什么显示不了,请教各位,我的代码如下:
newChartObj.Chart.ChartWizard Source:=Worksheets(1).Range("B19:F20"), gallery:=xl3DColumn, PlotBy:=xlRows, categorylabels:=False, seriesLabels:=False, HasLegend:=False 展开
newChartObj.Chart.ChartWizard Source:=Worksheets(1).Range("B19:F20"), gallery:=xl3DColumn, PlotBy:=xlRows, categorylabels:=False, seriesLabels:=False, HasLegend:=False 展开
1个回答
展开全部
使用chartwizard 函数excel不会识别上面一行是标题行,他将两行都识别成了数据行,所以产生了两个系列。
newChartObj.Chart.ChartType = xl3DColumnClustered
newChartObj.Chart.SetSourceData Source:=Worksheets(1).Range("B19:F20"), PlotBy:=xlRows
newChartObj.Chart.RightAngleAxes = True
newChartObj.Chart.HasLegend = False
newChartObj.Chart.ChartType = xl3DColumnClustered
newChartObj.Chart.SetSourceData Source:=Worksheets(1).Range("B19:F20"), PlotBy:=xlRows
newChartObj.Chart.RightAngleAxes = True
newChartObj.Chart.HasLegend = False
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询