Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


35088 / 76738 ←次へ | 前へ→

【46853】Re:テキストファイルを順次読み込ませたい
質問  モスキート  - 07/2/19(月) 8:04 -

引用なし
パスワード
    ▼かみちゃん さん:
>こんにちは。かみちゃん です。
>
>>まず一個目のテキストファイル全文をコピーアンドペーストでシートに貼り付け、
>>間を空けずにすぐ下のセルに二個目のテキストファイル全文を貼り付け、
>>また次のテキストファイルを間を空けずにすぐ下のセルに貼り付け…
>>
>>を繰り返させたい
>
>そのテキストファイルは、5列1440行にスペース区切りで数値が書かれているとあるのですが、
>例えばそのテキストファイルが5行のものだとすると形とは、1440行ということでいいのですか?
>あと、ファイルが31個とありますが、その制限はどのようにされるつもりですか?
>特定フォルダに対象とするテキストファイルを入れておき、そのフォルダにあるテキストファイル
>はすべて処理するということでいいですか?
>その場合、ファイル数が46個以上になると、Excel2003までは、46×1440=66240で最大行を超えて
>しまいますがそのあたりはどのようにされるつもりですか?
>
>一応、以下に参考となると思われるURLを紹介させていただきます。
>http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_110_080.html
>http://www.officetanaka.net/excel/vba/filesystemobject/index.htm

レスありがとうございます。
説明不足だったようで、すいませんでした。
補足させていただきますと、
実際に私が使うことになるテキストファイルの、最初の5行をそのままコピペしますが

0; 0    0    0   0.0   0.0
0; 1    0    0   0.0   0.0
0; 2    0    1   0.2  129.0
0; 3    0    0   0.0   0.0
0; 4    0    2   0.5  103.2

このようになっており、これが1440行まで続いています。
ちなみに一番左の列は時間を表しており、
これが23:59まで続いているので1440行になっています。
また、31個と書きましたが
1個のテキストファイルに1日分のデータが書かれています。
これが月毎のフォルダに分けられているので
1つのフォルダの中に入っているtxtファイルの数は28個、30個、31個の3通りのみ。
また、1つのシートに1つのフォルダ分のtxtファイルだけをコピペしたいので
エクセルの最大行を超えてしまうことは有り得ないはずです。
紹介されたURLを、別のレスで書いていただいたプログラムと照らし合わせて読み、自分なりに書き換えてみましたが、どうしてもエラーが出て動きませんでした。
その時のエラーメッセージは「400」でした。
私には意味はわかりませんでしたが…
すいませんがもう少しだけ詳しく、プログラムの各部位が何を表しているかを
教えていただけないでしょうか?
よろしくお願いします。

0 hits

【46846】テキストファイルを順次読み込ませたい モスキート 07/2/18(日) 20:47 質問
【46847】Re:テキストファイルを順次読み込ませたい かみちゃん 07/2/18(日) 21:09 発言
【46851】Re:テキストファイルを順次読み込ませたい かみちゃん 07/2/18(日) 21:41 発言
【46853】Re:テキストファイルを順次読み込ませたい モスキート 07/2/19(月) 8:04 質問
【46859】Re:テキストファイルを順次読み込ませたい neptune 07/2/19(月) 10:22 発言
【46864】Re:テキストファイルを順次読み込ませたい モスキート 07/2/19(月) 12:13 質問
【46867】Re:テキストファイルを順次読み込ませたい neptune 07/2/19(月) 13:07 回答
【46876】Re:テキストファイルを順次読み込ませたい モスキート 07/2/19(月) 15:19 お礼
【46877】Re:テキストファイルを順次読み込ませたい Kein 07/2/19(月) 15:22 回答

35088 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free