2017-12-28 14 views
0

したがって、私はちょうど1つのシリーズ(x = lng、y = lat、z = population)の2Dバブルチャートを持っています。ルーピングスルーデータポイントグラフのねじの凡例

私はデータポイント全体をループしてバブルのRGBを変更して、いくつかのソーシャルグループに関するいくつかの追加情報をコーディングする必要があります。

Sub PintarColores() 
    Dim p As Point 

    Worksheets(2).ChartObjects(1).Activate 
    For Each p In ActiveChart.SeriesCollection(1).Points 
     p.Format.Fill.ForeColor.RGB = rgbRed 
    Next 
End Sub 

これは、すべての点を赤色にしたテストコードです。これを実行した後、ロジックを追加します。

コードを実行する前に、私の1つのセリグラフに1つのアイテム(人口)を持つ凡例があります。私はそれを実行した後、色は予想どおりに変更されますが、凡例は経度の値のリスト(y)に変更されます。

arroundを検索しようとしましたが、その理由を見つけることができませんでした。

ありがとうございます!

+0

これは、各データポイントを別々にフォーマットするためです。 'Format Data Series'ペインで' Fill&Line'をクリックし、 'Fill'を展開し、' Points by colors'チェックボックスを選択するのと同じです。私が知る限りこれを避ける方法はありません。 –

+0

ありがとうございます。正確にはそうだと思われる。残念な。私は伝説を自分で作っていきます。ありがとうございますm8。あなたの答えを検証したり、あなたに+1などを与える方法はわかりません。 – Torrezno

+0

シリーズが1つしかない場合、伝説はやや冗長ですね。 –

答えて

0

Axel Richterが回答しました。この方法がないと思われる