1

Excel のワークシートにグラフがあり、マクロを設定して、特定のセルの値を変更すると、グラフのデータ範囲がA2、この特定のセルに対応する行番号まで下に設定されるようにします。

私ができないように見えるのは、指定された軸がグラフの範囲をカバーしなくなったため、軸を変更することです。つまり、現在の X 軸は次のように設定されています。

=Sheet1!$C$2:$C$600

マクロでこれを更新する方法がわかりません。どんな助けでも大歓迎です。

4

2 に答える 2

5

他の質問に対するランスの回答と同じ方法で XValues プロパティを設定できるはずです。

Charts("chartname").SeriesCollection(1).XValues = "=MYXAXIS"

または、x 軸値の名前付き範囲と呼ぶものは何でも。グラフに複数のシリーズがある場合は、適切なシリーズを参照するように SeriesCollection の値を変更する必要があります。

于 2008-10-16T17:16:38.857 に答える
1

「特定のセル」には、データの最後の行番号が含まれていますか? （はっきりとは分かりません）

セル F1 にデータの最後の行が含まれているとします。次のようにアドレスと範囲を作成できます。

Dim rXVals As Range
Dim sAddress AS String

sAddress = "Sheet1!$C$2:$C$" & Worksheets("Sheet1").Range("F1").Value
Set rXVals = Range(sAddress)
Worksheets("Sheet1").ChartObjects(1).Chart.SeriesCollection(1).XValues = rXVals
于 2008-11-04T04:56:10.733 に答える