|
▼ゴルゴン130 さん:
>昨日から何度やってもインデックスの範囲が・・型が・・・などエラーがでてしまいます。
今度からそうしてください。
>このデータを使って合計や平均など求めようとしています。
>現段階では配列に数値を入れた時点でエラーがでます。
お願い:
どこでエラーが発生するかしるしを付けていればわざわざ始めから眺めずに
すみますから、次回からそうして下さい。
> '「,」区切りでデータを区切る・配列に入れる
> tblDataRow(k) = csvDATA
Check1:
ここで配列に代入しようとしているが、配列が定義されていない。
変数を宣言する際、あらかじめ次元数、要素数が明らかな場合宣言の際
配列の定義をしておく
dim tblDatafield(10) as string '要素数は適当
処理の途中で要素数がわかる場合や、変化する際はRedim ステートメント
を使用する。Redim ステートメントHelp参照の事
使い方がわからなければ過去ログを検索すればあるのでは?
以下lBuf以外の全ての?配列変数について同じことが言える。
ざっと見ただけですが、エラーの原因の一つであることは間違いないです。
ここから訂正していきましょう。
それと、エラーとは関係ないですが、
>Dim j As Long
>Dim k As Long
などのカウント用の変数をモジュール単位のスコープで使うのは
止めましょう。そのうち必ず混乱しますから。
送信前の読み直しの時気付いたこと
>Dim tblDataSuuti() As Variant
Dim tblDataSuuti As Variant
ですね。
・・・又気付いたこと、Variant型の乱用は止めましょう。
資源の無駄です。(もうそういう時代ではないか ^ ^;)
とりあえず、この辺でやめておきますから、消化してくださいね。
|
|