[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『積み上げ棒グラフの一括色変更』(初心者)
表題の通り、いくつものデータがある場合ですが棒グラフのすべての色を白にしたい場合、一括で変更するやり方はありますか?
< 使用 Excel:Excel2016、使用 OS:Windows10 >
Sub test() Dim i As Long Dim j As Long
With ActiveSheet.ChartObjects For i = 1 To .Count With .Item(i).Chart.FullSeriesCollection For j = 1 To .Count With .Item(j).Format .Fill.ForeColor.RGB = RGB(255, 255, 255) .Line.ForeColor.RGB = RGB(0, 0, 0) End With Next j End With Next i End With End Sub
しかし、全部同じ色にしてしまうと、棒グラフの意味が半減してしまうのでは?
(どの棒がどのデータか判らない)
(???) 2020/09/15(火) 09:51
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.