私はあなたの一人が解決できるかもしれないもう一つのかなり厄介な問題を抱えています。つまり、基本的に、ExcelVBAを使用して線グラフを作成するためのこのコードがあります。動的であり、値を追加すると変更できるように作成されています。ただし、最初の値を0として読み取り、最後の値を0として読み取っていますが、0ではありません。グラフをページに配置するために使用しているコードは次のとおりです。
Sub createchart4()
lastA = Range("A1").End(xlDown).Row
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlLine
ActiveChart.SetSourceData Source:=Range("Main!$A$1:$A$" & lastA)
ActiveChart.ChartTitle.Select
ActiveChart.SeriesCollection(1).Name = "=Main!$A$1"
ActiveChart.SeriesCollection(1).Values = "=Main!$A$3:$A$" & lastA
End Sub
A3の値は実際には1534の場合は0であり、A10とA11も異なる場合は0として読み取られます。
あなたがこれを理解することができれば、私は驚かれることでしょう:D