VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日： 2003/10/14(Tue) 13:36
投稿者： 花ちゃん
Ｅメール：
ＵＲＬ：
タイトル： Re^5: MSChartのＹ軸の倍率

> そういったオブジェクトなりプロパテーがあるかどうかをお尋ねしている訳です。
そのようなものがないから、

>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秒も掛からないでしょうし、複雑だとも思えないのですが。

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- Web Forum -