以下、お助けいただけたら幸いです!!
バブルチャートの色を変えるマクロに悩んでおります。
具体的にコードをどうしたらいいのか 歯が立ちません。
■どんなマクロを作成したいのか?
→既に作ってあるバブルグラフの”グラフの色を変える”マクロ
【元データ表】
A列:県名、B列:X値、C列:Y値、D列:バブルの大きさの値
【既にあるグラフ】
データ系列:列
X値:B2:B85、Y値:C2:C85
サイズ:D2:D85
★今回は”85”ですが 範囲はそれ以上それ以下のときもあります
■問題点
データ数は80個以上。
→★エクセルの色は56色なので56個超えるとエラーになる
→★色番号をバブルのカウントと対応させ1から指定すると黒など原色が出てしまう。淡い色にしたい
■変えたい点:
色番号20番~50番まえを繰り返し使いたい
No.1ベストアンサー
- 回答日時:
アルゴリズムが思いつかないだけと見受けましたので、あえて説明無しのコードだけで。
(全角スペースは半角に変換ください)
Sub PntClr()
Dim l As Long
Dim NoPnt As Integer
Dim CI As Integer
Application.ScreenUpdating = False
l = 1
CI = 20
With ActiveChart.SeriesCollection(1)
NoPnt = .Points.Count
Do While l < NoPnt
If CI = 50 Then CI = 20
.Points(l).Interior.ColorIndex = CI
l = l + 1
CI = CI + 1
Loop
End With
Application.ScreenUpdating = True
End Sub
そのものです!! できました
厚かましい質問にご丁寧な回答 本当に助かりました!!
具体的に自分が書いていたコードを書かずに申し訳ございません。
考えたのですがどうしてもわからなかったのです。
項目のラベル、判例を無くす、
など自分なりにコードを書いたのですが色となるとはたしてどう反映させたらいいのか行き詰まりました。
そうです
構文の基は”Do While”なのだ、
という初心者ではあっても
その見当はついたのですが どうやってやるのかがわからなかった
If CI = 50 Then CI = 20
.Points(l).Interior.ColorIndex = CI
l = l + 1
CI = CI + 1
ここが特に勉強になりました。
なるほどです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 図のような散布図の作り方を教えてください。 1 2022/07/19 11:52
- Excel(エクセル) Excel_マクロ_複数のシートのVLOOKUPで表示された#N/A以外に色付けをしたいです 1 2023/02/16 22:37
- Excel(エクセル) [Excel2016] 相関表等の自動作成 2 2022/08/01 20:34
- その他(Microsoft Office) マクロVBAについて 1 2022/09/06 18:12
- Visual Basic(VBA) エクセルから、パワーポイントのスライドを複数作成する。 1 2022/07/08 09:40
- Visual Basic(VBA) マクロ実行時、自動で背景色を変えたい。 C列にあるチェックボックスをチェックするとB列に「TRUE」 4 2022/11/08 11:14
- Visual Basic(VBA) 指定月分の顧客データファイルを統合して並べ替え、所定の場所に貼り付ける (再質問) 4 2022/09/14 22:51
- Excel(エクセル) excelの列幅高さが勝手に変わる(特定のPCだけ) 8 2022/07/14 16:51
- Excel(エクセル) エクセル マクロ 行や列を削除しても 常にC3セルに背景色を維持 6 2023/04/04 02:07
- Visual Basic(VBA) Excelで横書き50行の漢字テストデータを縦書きのテスト問題にしたい。 6 2022/04/27 15:03
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
首吊りどこ締めるの
-
至急!尿検査前日にオナニーし...
-
腕を見たら黄色くなってる部分...
-
検便についてです。 便は取れた...
-
彼女のことが好きすぎて彼女の...
-
勃起する時って痛いんですか? ...
-
精子が黄色?
-
口の中に黒い血の塊
-
白血球が多いとどんな心配があ...
-
尿検査前日に自慰行為した時の...
-
中出しをするとお腹が痛い・・・。
-
精子に血が・・・
-
これって喉仏ですか? 私は女性...
-
爪が紫色?
-
納豆食べた後の尿の納豆臭は何故?
-
筋トレするとチンコが縮んじゃ...
-
射精をして1週間以内に尿検査を...
-
尿検査の前日は自慰控えたほう...
-
EXCELで式からグラフを描くには?
-
excelでsin二乗のやり方を教え...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
至急!尿検査前日にオナニーし...
-
首吊りどこ締めるの
-
尿検査の前日は自慰控えたほう...
-
尿検査前日に自慰行為した時の...
-
検便についてです。 便は取れた...
-
白血球が多いとどんな心配があ...
-
中出しをするとお腹が痛い・・・。
-
射精をして1週間以内に尿検査を...
-
彼女のことが好きすぎて彼女の...
-
腕を見たら黄色くなってる部分...
-
勃起する時って痛いんですか? ...
-
変な話しになります。尿検査で...
-
これって喉仏ですか? 私は女性...
-
EXCELで条件付き書式で空白セル...
-
男です。昨日の午後3時くらいに...
-
今朝、毎朝の習慣でオナニーし...
-
納豆食べた後の尿の納豆臭は何故?
-
1日前の検尿
-
値が入っているときだけ計算結...
-
精子が黄色?
おすすめ情報