グラフでシリーズに名前を付けるための vba コードを作成しました。
ActiveChart.SeriesCollection(1).name = "SPEC"
ActiveChart.SeriesCollection(2).name = "manju"
私の問題は、vba コードを使用して特定のシリーズ名を見つけたいということです。上記のコードには、2 つのシリーズがあります。今度は、VBA コードを使用してシリーズ名 (まんじゅう) を見つけたいと思います。
名前を渡してにアクセスするにはSeriesCollection()、次のことができます。
MsgBox ActiveChart.SeriesCollection("manju").Name
indexinSeriesCollection(index)は実際には型であるため、型を渡して名前でアクセスしようとしている場合、または(またはその他の数値データ型) を渡して列挙子にアクセスしてVariantいる場合にコンパイラが機能するため、これが可能です。StringLong/Integer
または、現在の名前を「manju」と比較して、SeriesCollection を繰り返します。
For i = 1 to ActiveChart.SeriesCollection.Count
If ActiveChart.SeriesCollection(i).name = "manju" Then
MsgBox "Found it!"
Exit for
End if
Next