我正在尝试使用下面的数据制作柱形图。这是用户友好界面的一部分,因此第一列代表当前案例,并且在电子表格中我有一个按钮,可以将数据复制到下一列,当用户更改输入值时,它会保存它们正在工作的情况上。注意,电子表格中的这两行不相邻。标题(案例)位于电子表格的顶部,百分比是几行。
"Current Case" "Case 1" "Case 2" "Case 3" "Case 4"
85% 85% 80% 90% 70%
由于这是一个活动的工作表,我不是只选择5列,而是用户可以输入几个案例。我希望功能正常工作,以便它能准确显示5个案例(如上所述),但是如果它们出现在工作表上,它们也会显示更多案例。
我一直在尝试使用下面的代码。我希望“案例”在x轴上,我希望百分比轴在y轴上。我有一个问题是如何表示我想要的数据。我还希望图表上的每个栏都能呈现个案。
CODE:
Sub Chart1()
Dim wsData As Worksheet
Dim cht As Chart
Set wsData = ThisWorkbook.Worksheets("Sheet1")
Set cht = Charts.Add
With cht
.SetSourceData wsData.Range("C4:XFD4", "C17:XFD17")
.PlotBy = xlColumns
.ChartType = xlColumnStacked
.HasTitle = True
.ChartTitle.Text = "% Conversion"
End With
End Sub
提前感谢您的帮助!!