投稿日 | : 2003/09/11(Thu) 16:49 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re: オブジェクトの保存 |
ようは、モノクロ表示にした後、元のカラー表示に簡単に戻せればいいのでしょうか?
元々モノクロ表示は塗りつぶしのパターンをハッチングに変更して
いるだけなので、表示パターンを塗りつぶしにして再表示すればできます。
私のサンプルなら下記のように(MSChart関係参照)
Private Sub mnuSolid_Click()
Dim series As Object
For Each series In MSChart1.Plot.SeriesCollection
With series
'表示スタイルを塗りつぶしパターンに
.DataPoints(-1).Brush.Style = VtBrushStyleSolid
End With
Next
'2D棒グラフで再表示
intChartType = VtChChartType2dBar
Call sChartViewSet
End Sub