Excel VBA質問箱 IV

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

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


28080 / 76732 ←次へ | 前へ→

【53960】[難題相談]フォルダ内の*.csvファイルを統合し、データをまとめる
質問  cpdim  - 08/2/18(月) 16:45 -

引用なし
パスワード
   こんにちは。ExcelのVBAについてのご相談を申し上げます。

VBAに関しては勉強しているつもりでしたが、
今回は私の実力では完全にお手上げ状態でみなさんのお力をお貸しいただきたく投稿しました。
どうぞよろしくお願いいたします。

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
【現状】
<フォルダ内のファイル名>
1.「DATA」というフォルタ内には約1000個の"abc_eea_0001234.csv"のようなcsvファイルが存在。
2.ファイル名の中のeeaは他にeea,eeb,eec,efa,efb,efcのようなファイルが同じフォルダ内に混在。

<ファイル内のデータ>
3.各ファイルの中身は、1aセル:日付、1bセル:eea(ファイル名の一部)、1cセル:0001234(ファイル名の一部)になっていて、11行から本データが入っている。
4.本データの形式は、11行から1000行まで並んでおり、A,B,Cまでのセルに保存されている。(下のような形式)

*************************************
   A     B     C(セル)
*************************************
1  日付     eea   0001234

        .....

8 --------------------------------
9  line    num    data
10 --------------------------------
11  101     111    8123
12  102     112    2145
13  103     113     142
         .
         .
         .
513 602     12     51
*************************************

【やりたいこと】
1.「DATA」フォルダ内の全てのCSVファイル名を検索し、eea〜eecかeed〜eefを選択処理する。
2.eea〜eecの場合は、全てのcsvファイルに関して、1a:日付, 1b:eea, 1c:001234のデータと11行から1000行までのc列の縦のデータを取り出し、下のように横並びに並べ替える。


********************************************
   A   B   C    D  E  ...
********************************************
2   line:       101  102  ...
3    num:       111  112  ...
4  日付 eea 001234  data  data ...
5  日付 eea 001235  data  data ...
6  日付 eea 001236  data  data ...
         ...

31 日付 eeb 000001 data data ...
32 日付 eeb 000002 data data ...
         ...

153 日付 eec 001923 data data ...
154 日付 eec 000002 data data ...
         ...
          
********************************************

3.上のようにまとめたファイルを"xxx.csv"というファイル名で保存する。


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
ここまでです。
大変厚かましい事で、恐縮ではございますが、
どうか、みなさんの助けをお願い申し上げたいのです。よろしくお願いします。

0 hits

【53960】[難題相談]フォルダ内の*.csvファイルを統合し、データをまとめる cpdim 08/2/18(月) 16:45 質問
【53962】Re:[難題相談]フォルダ内の*.csvファイルを... かみちゃん 08/2/18(月) 18:18 発言
【53963】Re:[難題相談]フォルダ内の*.csvファイルを... cpdim 08/2/18(月) 18:41 お礼
【53964】Re:[難題相談]フォルダ内の*.csvファイルを... かみちゃん 08/2/18(月) 18:57 発言
【53970】Re:[難題相談]フォルダ内の*.csvファイルを... cpdim 08/2/19(火) 9:54 お礼
【53971】Re:[難題相談]フォルダ内の*.csvファイルを... かみちゃん 08/2/19(火) 10:00 発言
【53978】Re:[難題相談]フォルダ内の*.csvファイルを... cpdim 08/2/19(火) 14:48 お礼
【53993】Re:[難題相談]フォルダ内の*.csvファイルを... かみちゃん 08/2/19(火) 17:27 発言
【53996】Re:[難題相談]フォルダ内の*.csvファイルを... cpdim 08/2/19(火) 18:00 質問
【54003】Re:[難題相談]フォルダ内の*.csvファイルを... neptune 08/2/19(火) 23:13 発言
【54007】解決しました。どうもありがとうございまし... cpdim1 08/2/20(水) 0:30 お礼
【53972】Re:[難題相談]フォルダ内の*.csvファイルを... VBWASURETA 08/2/19(火) 10:06 回答
【53973】Re:[難題相談]フォルダ内の*.csvファイルを... VBWASURETA 08/2/19(火) 10:12 発言

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