次の範囲定義を使用してグラフを作成した 500 個のセルのセットがあります。
=Sheet1!$A$1:$A$500
2 つのセルがB1
ありB2
、グラフの開始値と終了値 (1 ~ 500 内) を定義して、データのサブセット (20 から 200 としましょう) のみを表示したいと考えています。
セルを参照して、データ範囲定義でB1
とB2
を置き換える$1
にはどうすればよいですか?$500
一般に、チャート シリーズを定義する関数を使用して計算された名前付き範囲を持つダイナミック チャートを使用する必要がありますOFFSET
。COUNTA
SERIES
ここで説明するのはかなり大変ですが、スタッフのトレーニング用に作成した私自身のサンプル ファイルは次のとおりです。
最後の X ポイントの表示、X から Y までのポイントの表示など、4 種類の適用ダイナミクスが含まれています。リボンに移動して、Formulas > Name Manager
さまざまな範囲がどのように定義されているかを確認するには、魔法を確認してください。
私があなたのクエリを正しく理解していれば、と.SetSourceData
の値を使用して追加することができますB1
B2
ここに例があります
Option Explicit
'~~> Please amend the code as applicable
Sub Sample()
Dim objChrt As ChartObject
Dim chrt As Chart
Dim StartVal As Long, endVal As Long
With Sheets("Sheet1")
StartVal = .Range("B1").Value
endVal = .Range("B2").Value
Set objChrt = .ChartObjects("Chart 1")
Set chrt = objChrt.Chart
chrt.SetSourceData (.Range("A" & StartVal & ":A" & endVal))
End With
End Sub
スクリーンショット