投稿日 | : 2003/10/14(Tue) 13:36 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re^5: MSChartのY軸の倍率 |
> そういったオブジェクトなりプロパテーがあるかどうかをお尋ねしている訳です。
そのようなものがないから、
>Excelのようにデータの桁を調整してやればどうですか?
>データ=データ/1000 のようにして表示すればいいかと。
と申し上げたのです。
Excelを見れば解りますが、Excelでもそのようにしているはずです。
表示単位をComboBoxで選べば表示するデータをその桁に合せるように
処理しているかと思います。
2行10列のデータなら下記のようにすればいいかと
単位や系列数は変数で処理すればExcelと同様になります。
Private Sub setTani()
'表示するデータの桁合せ
Dim i As Long, j As Long
With MSChart1
For i = 0 To .ColumnCount - 1
.Column = i + 1
For j = 0 To .RowCount - 1
.Row = j + 1
.Data = .Data / 1000 'sngTani
Next j
Next i
End With
End Sub
このくらいの処理なら10分の1秒も掛からないでしょうし、複雑だとも思えないのですが。