• 締切済み

複数のファイルコピー

初めて質問をいたします。 VBAの勉強中なのですが、複数のフォルダの中にある特定のファイルを、別のフォルダにコピーをしたいのですが、どのようにしたら良いのでしょうか。 例えは、C:\aaa\bbb\cccの中へ C:\aaa\bbb\ddd\eee\fff\Jggg.xls、 C:\aaa\bbb\ddd\hhh\iii\Jjjj.xlsをコピーする感じです。 どのようにしたら、可能でしょうか。 C:\aaa\bbbフォルダ以下全てのフォルダの中から、「J」の付くxlsファイルを全てコピー等出来るのでしょうか。 よろしくお願いします。

みんなの回答

  • mitarashi
  • ベストアンサー率59% (574/965)
回答No.2

こちらでお勉強して下さい。 http://officetanaka.net/excel/vba/tips/tips36.htm このサイトの、FileSystemObjectに関する記述は充実していて、こちらで勉強すればファイル、フォルダ、テキストファイル操作の大抵の事は出来る様になります。 http://officetanaka.net/excel/vba/filesystemobject/filesystemobject.htm エクセルをＶＢＡで操作する時、セルを手始めに種々のオブジェクトを扱う事になりますが、それに慣れると、Basic本来のファイル操作よりも、このFileSystemObjectを用いる方が体に？馴染む感じがします。

  • bin-chan
  • ベストアンサー率33% (1403/4213)
回答No.1

'FSOを宣言 'FSOで検索条件に合致するファイルを検索し、結果が得られた場合に処理するループを作成 　'検索結果ファイルを、対象フォルダへコピー 　'（名前がかぶったらどうする？上書きするのか、スキップするのか） 'ループの終わり にコードの肉付けしてください

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • C言語による「テキストファイルの読み書き(fprintf)」について

    C言語による「テキストファイルの読み書き(fprintf)」について質問です ずぶの初心者ですが、既知のファイルの１行目に指定した文字列を付加させるプログラムを作りたいと思っています。 以下のように作りました。 ------------------------------------------------------------ #include <stdio.h> int main(void) { FILE *fp; fp = fopen("test.csv","r+"); fprintf(fp,"コントロールカラム1,コントロールカラム2,・・・(略)・・・,コントロールカラム56\n"); fclose(fp); return 0; } ------------------------------------------------------------ このとき「test.csv」の内容が以下のようであったとします。(容量は１MBくらいです。) 001,aaa,bbb,ccc,ddd,eee,fff,ggg,hhh,iii,jjj 002,aaa,bbb,ccc,ddd,eee,fff,ggg,hhh,iii,jjj ～(略) 5000,aaa,bbb,ccc,ddd,eee,fff,ggg,hhh,iii,jjj この状態でプログラムをコンパイルして実行すると、「test.csv」の内容が以下のようになってしまいます。(一行目が消える) AAA,BBB,CCC,DDD,EEE 002,aaa,bbb,ccc,ddd,eee,fff,ggg,hhh,iii,jjj ～(略) 5000,aaa,bbb,ccc,ddd,eee,fff,ggg,hhh,iii,jjj またcsvの行が増える度に妙な挙動になっていきます・・・(一行あいたり、先頭行が５行ほど消えたり) 希望する動作としては コントロールカラム1,コントロールカラム2,・・・(略)・・・,コントロールカラム56 001,aaa,bbb,ccc,ddd,eee,fff,ggg,hhh,iii,jjj 002,aaa,bbb,ccc,ddd,eee,fff,ggg,hhh,iii,jjj ～(略) 5000,aaa,bbb,ccc,ddd,eee,fff,ggg,hhh,iii,jjj のようになるようにしたいのですがどのようにすればよいのでしょうか。 よろしくお願いします。 （使用ソフト：Borland C++ Compiler, Cpad） 参考にしたサイトの項目：http://homepage3.nifty.com/mmgames/c_guide/17-01.html

  • VBAでCSV内にある改行を取る方法

    あるシステムが吐くcsvファイルの項目の中に改行が入っているものがあります。 例） 01,aaa,bbb（改行）bbb,ccc（改行） 02,ddd,eee,fff（改行） 03,ggg（改行）ggg,hhh,iii（改行） このCSVファイルをエクセルのマクロで読み込んでシートに展開したい のですが、項目中にある改行で別レコードを認識してしまいます。 結果） A B C D ---+---+---+--- 01 aaa bbb　 bbb ccc 02 ddd eee fff 03 ggg ggg hhh iii これを以下のようにしたいのですが・・・ A B C D ---+------+------+---- 01 aaa bbbbbb ccc 02 ddd eee fff 03 gggggg hhh iii どうやればよいでしょうか？ ご教授お願いいたします。

  • sedで文字列の抜き出し

    ある一部分の文字列を抜き出したく、sedを使用したいと思って試行錯誤しております。 ↓あるファイル内の文字列 aaa bbb=ccc:ddd=eee:fff=ggg: aaa bbb=hhh:ddd=iii:fff=jjj: ※aaaとbbbの間はスペースです。 ※bbb,ddd,fffはある一定のキーワードです。 ※ccc,eee,ggg,hhh,iii,jjjはバラバラの文字列で長さも一定ではありません。 【質問】 上記の文字列の中でddd=の後の文字列（eee,iii）のみを抜き出したいです。 以下のようなsedを試してみましたが、 eee:fff=ggg iii:fff=jjj が抜き出されてしまいます。 sed 's/.*:ddd=\(.*\):\(.*\)$/\1/' 恐れ入りますが、皆様の知恵をお貸し下さい。

  • コピー元が固定パスでない場合のxcopyコマンドの書き方

    xcopyコマンドをバッチファイルで実行するのですが、 固定パスの場合は、 xcopy c:\aaa\bbb.txt c:\ccc （c:\aaaフォルダ内のbbb.txtをc:\ccc） と書けばよいと思うのですが、 コピー元が固定のパスではない場合はどうやって書けば良いのでしょうか？ やりたいことは、 dddと言うフォルダの中にバッチファイルとeeeフォルダが あり、eeeフォルダの中にコピーしたいもの(fff.txt)が入っています。コピー先は固定でc:\gggの場合 dddと言うフォルダは何処にあっても可能な場合です。 win2000とwin98で書き方が違う場合は両方お願い致します。 よろしくお願いいたします。

  • SQL　複数条件を設定

    使用言語はjavaで処理しており、 SQL Server2005にて下記のようなテーブル(T_Kekka)があります。 　　　ID　　　a-1　　　a-2　　　b-1　　　b-2　　　c-1　　　c-2　　　 ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣ 　　　１　　　bbb　　　aaa　　　ddd　　　　ccc　　　eee　　　fff　　　 　　　２　　　ggg　　　bbb　　　ccc　　　　 hhh　　　iii　　　　jjj　　　 　　　３　　　bbb　　　mmm　　　ddd　　　ccc　　　fff　　　　eee　　　 　　　４　　　bbb　　　aaa　　　ccc　　　　ddd　　　qqq　　　rrr　　　 　　　５　　　zzz　　　sss　　　ttt　　　　　ccc　　　vvv　　　xxx　　　 　　　６　　　zzz　　　aaa　　　ttt　　　　　ccc　　　vvv　　　fff　　　 　　　７　　　zzz　　　zzz　　　zzz　　　　　zzz　　　zzz　　　　zzz　　　 　　　８　　　qqq　　　rrr　　　ccc　　　　　ddd　　　fff　　　　eee　　　 検索する値は下記の通りです。 検索値 ｜a-1｜a-2｜b-1｜b-2｜c-1｜c-2｜ ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣ ｜aaa｜bbb｜ccc｜ddd｜eee｜fff｜ 期待値としては、aはaのグループで検索、bはbのグループで検索、cはcのグループで検索をし、 一致個数の多い順に出力したいと考えております。（理想は下記のような感じです。） また、グループ内であれば逆転していてもＯＫです。 （例えばＩＤ：１のaグループのような感じです。） *1　一致数が同じ場合はcグループの数が多いデータが最優先となり、その他はＩＤ順になります。 期待値 　　　ID　　　a-1　　　a-2　　　b-1　　　b-2　　　c-1　　　c-2　　　一致数 ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣ 　　　１　　　bbb　　　aaa　　　ddd　　　ccc　　　eee　　　fff　　　　　6 　　　３　　　bbb　　　mmm　　　ddd　　 ccc　　　fff　　　 eee　　　　5 　　　８　　　qqq　　　rrr　　　 ccc　　　ddd　　　fff　　　　eee　　　　4・・・*1 　　　４　　　bbb　　　aaa　　　ccc　　　ddd　　　qqq　　　rrr　　　　 4 　　　６　　　zzz　　　aaa　　　ttt　　　 ccc　　　vvv　　　 fff　　　　　3 　　　２　　　ggg　　　bbb　　　ccc　　　hhh　　　iii　　　　 jjj　　　　　 2 　　　５　　　zzz　　　sss　　　ttt　　　 ccc　　　vvv　　　 xxx　　　　　1 　　　７　　　zzz　　　zzz　　　zzz　　　 zzz　　　zzz　　　 zzz　　　　　0 知識不足のため私には複雑すぎて悩んでいる状況なので、 どなた様か知識がある方にご教授願いたく思います。 また、まだテスト段階なので現状のようなテーブル構造にしてしまいましたが、 他のテーブル構造の方がデータが抽出しやすかったり、レスポンスがいい場合がありましたら、 ご教授いただけると助かります。 説明が分かりづらく表が見づらくて申し訳ございませんが、 宜しくお願い致します。

  • SQLについて

    aaa bbb ccc ddd eee ggg hhh ---------------------------------------------- 111 111 111 111 111 111 111 112 112 112 112 112 112 111 112 113 113 113 113 113 111 114 114 114 114 114 114 111 114 114 114 114 114 114 112 114 115 115 114 114 115 111 114 115 115 114 114 115 112 116 116 116 116 116 116 111 116 116 116 116 116 116 112 116 116 116 116 116 117 111 116 116 116 116 116 117 112 118 118 118 118 118 118 118 上記のようなデータより、SQLのSELECTを使用して、以下のように抽出したいです。 抽出条件は以下が全て満たしているものとなります。 ・aaa,ccc,ddd,eee,gggが重複、hhhが小さいもの ・bbbが異なるもの aaa bbb ccc ddd eee ggg hhh ---------------------------------------------- 112 112 112 112 112 112 111 ・・・(1) 112 113 113 113 113 113 111 ・・・(1) 114 114 114 114 114 114 111 ・・・(2) 114 115 114 114 114 115 111 ・・・(2) (1)はaaa,ccc,ddd,eee,gggが重複、bbbが異なるため抽出対象 (2)はaaa,ccc,ddd,eee,gggが重複、bbbが異なるため抽出対象 　また、hhhが小さいもの 以上、よろしくお願いします。

  • 配列の移動

    TEXTファイルに文字列を書き込んだり削除したり移動したりするプログラムを作成していますが、 aaa bbb ccc ddd eee fff ggg hhh iii このような内容を 1,aaa bbb ccc 2,ddd eee fff 3,ggg hhh iii のように上から順番に配列化して番号を指定して移動させたいのですが、 3の配列を2の上(配列１と配列２の間)や下(配列２と配列３の間)に移動するのにはどのようにしたら良いのでしょうか？

    • ベストアンサー
    • Perl
  • Perlの正規表現について

    Perlの正規表現について質問です． ■質問 aaa bbb aaa bbb ccc "ddd" aaa bbb ccc "ddd eee" aaa bbb ccc ddd eee "fff ggg hhh iii" というような，文字列が書かれているファイルがあるとします． ※ダブルクォーテーションが無い行もあります． ※ダブルクォーテーション内のスペースの数は，行によってそれぞれ異なります． これを，ダブルクォーテーションの中にあるスペースだけ アンダーバーに置換する場合の正規表現を教えて下さい． つまり，下記の出力にしたいです． aaa bbb aaa bbb ccc "ddd" aaa bbb ccc "ddd_eee" aaa bbb ccc ddd eee "fff_ggg_hhh_iii" ■条件 ※ちょっと古いPerlでも動くよう，ゼロ幅肯定/否定後読((?<),(!<))は使わないでください． ※単に実現するだけなら， # cat inputfile | print -pe 'sub f(){}(shift;s/ /_/;return $_;); s/(\".*\")/&f($1)/e;' みたいな感じで置換できそうですが，「正規表現だけで簡単に書けるかどうか」が知りたいのです(正規表現だけで実現出来る場合，そのアルゴリズムを知りたいです)．そのため，関数と/eオプションは使わないでください．

    • ベストアンサー
    • Perl
  • EXCEL VBA 行列操作

    どなたか教えてください。 下記の様にA1からH5までの範囲に値がある行とない行があります。 空白セルを無視しA10に行列を操作し（行列入れ替え？）、さらに上詰め でコピーしたいのです（上にある行から列順に）。 よろしくお願いします。 例です 　A 　 B 　 C 　 D 　 E 　 F　 G 　 H 1 2 　　　　　　　 　　　　 　　　　 aaa bbb 3 ccc ddd eee fff ggg 4 5 hhh ～ 10 aaa 11 bbb 12 ccc 13 ddd 14 eee 15 fff 16 ggg 17 hhh

  • Excelの関数に詳しい方、お願いします。

    わかりづらい説明かもしれませんが、よろしくお願いします。 例として、 AAA*BBB*CCC*DDD*EEE*FFF AAA*BBB*CCC*DDD*EEE*FFF AAA*BBB*CCC*DDD*EEE*FFF AAA*BBB*CCC*DDD*EEE*FFF AAA*BBB*CCC*DDD*EEE*FFF ・ ・ ・ といった文字列がエクセルの先頭列Ａ１～Ａ100までずらりと並んでいるとします。 各アルファベットには任意の数字（日付など）が入るとして、この並んだ百件のデータからＣＣＣの部分の最大値を表示するための適切な関数があれば教えていただけないでしょうか？ 現在少々急いでいるため言葉足らずで申し訳ありませんが、よろしくお願いいたします.

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する