1

「.Values」が別のモジュールから取得した「Rel​​iabilityNumber」という配列に基づいているグラフを作成しています。適切なデータポイントを取得する際に、すべてが正常に機能します。ただし、配列内の要素数 (チャートの「タイムステップ」) が 16384 を超える場合、この数を超えるデータポイントはチャートに表示されません。

さらに、要素数が 65536 を超えると、グラフが表示されなくなります。

私の見解では、最大列数 (Excel 2007 以降では 16384) と最大行数 (Excel バージョン 2003 以前では 65536) に関係があると考えています。しかし、私はそれが何であるかを理解できません。私のコードは以下のとおりです (私は仕事で Excel 2010 を使用し、自宅で 2016 を使用しています。問題は 2010 にあります。2016 ではまだこの問題を制御していません)。

Dim ReliabilityChart As Object
Dim ReliabilitySeries As Series

Set ReliabilityChart = ActiveSheet.ChartObjects.Add(Left:=300, Width:=500, Top:=10, Height:=300)
    With ReliabilityChart
    .Chart.Type = xlLine
    .Left = 600
    .Width = 800
    .Top = 50
    .Height = 300
    .Name = "ReliabilityChart1"

    Set ReliabilitySeries = .Chart.SeriesCollection.NewSeries
        With ReliabilitySeries
            .Values = ReliabilityNumber
            .Name = "Reliability on timestep #"
        End With

End With

ActiveSheet.ChartObjects("ReliabilityChart1").Activate
With ActiveChart
    .ChartType = xlLine
    .ChartTitle.Text = "Reliability over time"
    .Axes(xlCategory).TickMarkSpacing = 1600
    .Axes(xlCategory).TickLabelSpacing = 1600
    .Axes(xlValue).MaximumScale = 1
    .Axes(xlValue).TickLabels.NumberFormat = "0%"
    .Axes(xlCategory).HasTitle = True
    .Axes(xlCategory).AxisTitle.Text = "Timestep (#)"
    .Axes(xlValue).HasTitle = True
    .Axes(xlValue).AxisTitle.Text = "Reliability (%)"
End With

Sheets(1).Range("E10").Select
4

1 に答える 1