在Excel VB.NET中设置XValue

时间:2014-09-03 07:22:55

标签: vb.net excel

我在图表中设置XValue时遇到问题。我有一个多列(动态计数)所以我生成Range文本:

B8:E8;B10:E10;B12:E12;B14:E14;B16:E16

然后我将其设置为图表:

ExcelSheet.ActiveSheet.ChartObjects(1).chart.SetSourceData(Source:=ExcelSheet.Range(graf))

但后来我有了像#1; 1 2 3 4'

的XValues

我想设置(生成)类似

的XValues
    For i As Integer = 1 To 5
        With ExcelSheet.ActiveSheet.ChartObjects(1).chart.SeriesCollection(i)
            .Name = names(i - 1)
            .XValues = CStr(2010 + i)
        End With
    Next

但只设置了第一个XValue。你知道怎么解决这个问题吗?

3 个答案:

答案 0 :(得分:0)

我现在明白了,

事情是,只有一个系列设置了;

我需要将XValues设为

XVal &= ';' & CStr(2010 + i)

导致

2011;2012;2013;2014

答案 1 :(得分:0)

仅供参考:

还有另一种使用动态图表的方法。对于这种方法,请参阅

http://www.tushar-mehta.com/excel/newsgroups/dynamic_charts/index.html

答案 2 :(得分:-1)

            chartPage.SeriesCollection(1).xvalues = "={""OCt"",""Nov"",""Dec"",""Jan"", ""Feb"", ""Mar"", ""Apr"", ""May"" , ""Jun"", ""Jul"", ""Aug"", ""Sep""}" '"=Hour!$F$2,Hour!$I$2,Hour!$L$2,Hour!$O$2,Hour!$R$2,Hour!$U$2,Hour!$X$2,Hour!$AA$2,Hour!$AD$2,Hour!$AG$2,Hour!$AJ$2,Hour!$AM$2"
  

可以从细胞中获取值