csvファイルのデータの間引きをしたい

はじめまして。

csvファイルをもとにMSChartでグラフ表示するのですが、データ量が大きすぎ、描画に時間がかかってしまいます。
そこで、csvファイルの間引きを考えたのですが、うまい方法が見当たりません。
何かよい方法はございませんでしょうか？
よろしくお願いいたします。

P.S.
何行かおきに変数に読み込むことを考えたのですが、Line Inputでは解決出来ませんでした。

No.1 ベストアンサー 回答者： FEX2053 回答日時： 2006/12/07 10:02

Excelなり何なりのアプリで読み込んで加工し、

別のファイルとして吐き出すのが、結果的に一番簡単だと思います。

この回答へのお礼

間引き機能を持ったソフトを作りたいので、VBの上で処理したいと思いまして。

お礼日時：2006/12/07 12:29

No.2 回答者： dsuekichi 回答日時： 2006/12/07 11:54

> csvファイルをもとにMSChartでグラフ表示するのですが、データ量が大きすぎ、描画に時間がかかってしまいます。

今は、どうやってグラフ表示しているんでしょう？
その方法のまま、単純に「間引き」をすればよいだけの様な気がしますが・・・

＃例えば、ループ処理をやっているなら、
＃「ループカウンタの数値を３で割ったあまりを求めて
＃余りが０の時だけグラフの表示対象にする」
＃とかすれば１／３に間引けますよね・・・

> 何行かおきに変数に読み込むことを考えたのですが、Line Inputでは解決出来ませんでした。

これでも解決できそうな気がしますけど・・・
どう、やったんでしょう？？

この回答へのお礼

何とかできました。
ありがとうございました。

Open "Sample.csv" For Input As #1
Do Until EOF(1)
intRow = intRow + 1
For n = 0 To 4
Input #1, CsvR(n)
Next n
If intRow = 0 Then
For c = 1 To 4
Line(c) = CsvR(c)
Next c

ElseIf intRow Mod 3 = 0 Then

LineB(intRow) = CsvR(0)
For c = 1 To 128
intDat(intRow, c) = CLng(CsvR(c))
Next c
End If
Loop
Close #1

お礼日時：2006/12/07 12:27