グラフのプロットエリアの色を微妙な色に設定したいが?

Question 102.2 Previous Next
はじめまして。 VBAマクロで書かせたグラフの色を微妙な色に変えたいと思い、
以下の薄いグレーの番号で指定したのですが、 どうしても濃いグレーのままになってしまいます。 どうしてでしょうか?
プロットエリアの調整-

    With CH.PlotArea
        .Left = 1
        .Top = 12
        .Width = 233
        .Height = 132
        .Border.ColorIndex = 1
        .Interior.Color = RGB(220, 220, 220)
    End With
Answer   2010.8.18 永井善王
Excel2003以前の仕様では RGB関数の引数 red, green, blue に 0~255 の範囲の整数を指定できますが、その結果が標準カラーパレットにない色になる場合は、最も近いと判断された色に置き換わってしまいます。

しかし、もしも右図のような感じでよいならば、
[プロット エリアの書式設定]の [パターン]にある [塗りつぶし効果(I)]ボタンをクリックして、[パターン]タブの [前景(F)]を白色、[背景(B)]を25%灰色、[パターン(T)]に50%を選択して [OK]すれば実現できます。
コードはマクロ記録できますが、おおよそ下記のように、Fillプロパティを設定することになります。
    With CH.PlotArea
        .Fill.Patterned Pattern:=msoPattern50Percent
        .Fill.Visible = True
        .Fill.ForeColor.SchemeColor = 2
        .Fill.BackColor.SchemeColor = 15
    End With
なお、場合により、[塗りつぶし効果]のタブにある [テクスチャ]が使えるかもしれません。
ありがとうございました
すごいです。 希望の薄いグレーになりました。
これからもこのやり方でいかせてもらいます。 本当に有難うございました。。

 

Excel VBA Macro