MSChartで散布図を表示するには？ (ID:80990)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 試行錯誤様、ありがとうございます。 助かりました。ほとんどうまくいきました。 後の問題は、凡例に列のラベルが表示されないこと また、以下のように４列目のデータをマーカーに設定すると データ自体が表示されないこと があります。 このことで、助けてもらえないでしょうか。 Option Base 1 Private Sub Form_Load() Dim MyData(10, 4) As Single Dim i As Integer 'ためしのデータです For i = 1 To 10 MyData(i, 1) = i * 10 'x値 MyData(i, 2) = i + 2 'y値 MyData(i, 3) = i * 10 'x値 MyData(i, 4) = (i + 2) * 1.2 'y値 Next i With MSChart1 .Plot.UniformAxis = False 'これがないとうまく表示できません .chartType = VtChChartType2dXY .Column = 1: .ColumnLabel = "計算値" ’凡例ではC1と表示される。 .Column = 3: .ColumnLabel = "分析値" ’凡例ではC3と表示される .Plot.SeriesCollection(1).DataPoints(-1).Marker.Visible = False .Plot.SeriesCollection(2).DataPoints(-1).Marker.Visible = True .Plot.SeriesCollection(2).DataPoints(-1).Marker.Style = VtMarkerStyleCircle 'これでは４列目が表示されません .TitleText = "単純系" .ShowLegend = True .ChartData = MyData End With End Sub