Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11661 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【14950】ファイル結合 レッサーパンダ 04/6/11(金) 17:06 質問[未読]
【14951】Re:ファイル結合 ちゃっぴ 04/6/11(金) 17:21 回答[未読]
【14955】Re:ファイル結合 レッサーパンダ 04/6/11(金) 18:23 お礼[未読]
【14960】Re:ファイル結合 ちゃっぴ 04/6/11(金) 21:40 発言[未読]
【14950】ファイル結合
質問  レッサーパンダ  - 04/6/11(金) 17:06 -
引用なし
パスワード
   Ａ.csv、Ｂ.csvという２ファイルが存在します。（同じ項目を所有）
DOSコマンドでいえば、「copy Ａ.csv ＋ Ｂ.csv Ｃ.csv」です。
しかし、DOSコマンド（SHELL関数)ではやりたくないので、
どなたかご存知の方、ご教授ください。
ちなみに２ファイル以上あった場合でも処理できますか？
（実状は２ファイルです）

よろしくお願い致します。
【14951】Re:ファイル結合
回答  ちゃっぴ  - 04/6/11(金) 17:21 -
引用なし
パスワード
   OPENステートメントを使用する。

片方(A)をAppendモードで開き
もう片方(B)をInputモードで開く

で、すべての行を(A)に追記してやれば
完成です。
【14955】Re:ファイル結合
お礼  レッサーパンダ  - 04/6/11(金) 18:23 -
引用なし
パスワード
   ▼ちゃっぴ さん：
回答をありがとうございました。

>OPENステートメントを使用する。
>
>片方(A)をAppendモードで開き
>もう片方(B)をInputモードで開く
>
>で、すべての行を(A)に追記してやれば
>完成です。
　原始的ですが、やはりこれが一番良い方法なのでしょうか？
　なにか便利な関数（FileCopyの特殊なもの）があるのかなぁ・・と思ってました。
　処理時間（データ量）などを考慮した場合でも、この方法がベストなのでしょうか？
　AにBを追記ではなく、新しいコピー先ファイル（C)を設けて、事前削除とかをすれば、
　リラン（再処理）にも対応できるのかな・・。
【14960】Re:ファイル結合
発言  ちゃっぴ  - 04/6/11(金) 21:40 -
引用なし
パスワード
   >　処理時間（データ量）などを考慮した場合でも、この方法がベストなのでしょうか？

Binaryでやった方が速いと思います。

Aのファイルサイズを取得しておいて、
Bのデータをそのアドレスから一気に書き込んだ方が速いと思います。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11661 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free