出于某种原因,如果数据少于四行,并且您尝试分散图表,则图例中会显示集群(列A),但如果存在超过4行数据,则其他列(A, B,C)位于图例(Y轴)上。
你能否告诉我使用VBA如何将此图表重新定位为图表(2)?
我需要使用VBA将图例序列重定位到水平类别轴上(因为宏录制器不显示如何执行此操作。
GRAPH 1起初看起来像这样
图2这是我如何做的
(重定向图例条目 - 左侧和类别标签 - 右侧)
GRAPH 3散点图对话框看起来像这样,这就是我想在VBA中做的事情
GRAPH 4 Final Graph看起来像这样,这就是我想要在VBA中实现的
最后这是宏录制器创建的内容,但是当我尝试运行它时,它的缺失,范围和Plotby参数都会失败
Range("A1:D3").Select
Range("D3").Activate
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlXYScatter
ActiveChart.SetSourceData
答案 0 :(得分:1)
您的列和行是相反的。选择图表后,请转到“设计”上下文选项卡,然后单击“切换行/列”。这样可以解决吗?如果是,您可以使用:
ActiveChart.PlotBy = xlRows or ActiveChart.PlotBy = xlColumns
以编程方式执行此操作。