vb.net - 如何使用 vb.net 将 X 轴设置为等于 excel 中的预定范围

Question

我已经能够使用 vb.net 创建一个图表。数据显示正确，但是 X 轴递增 1、2、3... 如何指定 X 轴的范围。

我的代码是：

            Dim chartPage As excel.Chart
            Dim xlCharts As excel.ChartObjects
            Dim myChart As excel.ChartObject
            Dim chartRange As excel.Range

            oSheet.Cells(2).columnwidth = 4.29
            oSheet.Cells(3).ColumnWidth = 5.71
            oSheet.Range("D1", "P1").ColumnWidth = 6.14
            oSheet.Cells(17).ColumnWidth = 9.29
            oSheet.Cells(18).ColumnWidth = 12
            oSheet.Cells(19).ColumnWidth = 7.86

            xlCharts = oSheet.ChartObjects
            myChart = xlCharts.Add(715, 30, 672, 360)
            chartPage = myChart.Chart
            chartRange = oSheet.Range("D3", "S" + CStr(RowCount))
            chartPage.SetSourceData(Source:=chartRange)
            chartPage.ChartType = excel.XlChartType.xlLine

这是正在创建的电子表格： 电子表格和图表已创建

而不是图表的底轴是 1 throw 23 我需要它是 Weeks 列中的值。(C3:C26)

标签： vb.net