エクセルの折れ線グラフで規定値以上のマーカーの色を変更する方法

質問

こんにちは、教えてください。
エクセルの折れ線グラフを作成する際に、
規定の値以上のマーカーは別の色に設定する方法が、
ありますでしょうか。
ひとつづつ、データ要素の書式設定をする方法なら
分かるのですが、これは、大変に煩雑な作業でして・・
どなたかお分かりになりましたら教えてください。

回答No.2

imogasi · ベストアンサー

エクセルのグラフの場合、あまり一括・集合的な選択の設定は備えてないことが多い。したがって手作業をVBAでやって、手間を省くことで、出来た気になるしかないようなことが多々あります。
Sheet1のB列の５行データで２０以上は色を変える(赤）
にする例。
Sub test01()
For i = 1 To 5 '最下行数
ActiveChart.SeriesCollection(1).Points(i).Select
With Selection
Worksheets("sheet1").Activate
If ActiveSheet.Cells(i, "B").Value >= 20 Then
.MarkerBackgroundColorIndex = 3
.MarkerForegroundColorIndex = 2
Else
.MarkerBackgroundColorIndex = 8
.MarkerForegroundColorIndex = 2
End If
End With

Next i
End Sub

お礼

早々のご返答ありがとうございます。
VBAにて一度TRYしてみようと思います。
もし上手くいかなかったら、またお尋ねするかと
思いますが、よろしくお願いいたします。
有難うございました。

回答No.1

taocat

こんばんは。

エクセルの一般機能では無理だと思います。
VBAなら簡単なんですがねぇ。
VBAでやってみますか？
なら手順及びコードをアップしますが。
以上です。

お礼

早々のご返答ありがとうございます。
やっぱり基本的な機能では無理なんですね。
VBAにて可との事。ほかの方のご返答に詳細をいただいておりますので、これを参考に一度TRYしてみようと思います。
有難うございました。また、よろしくお願いいたします。