数階層のあるフォルダのコピーを 簡単にするVBA
数階層のあるフォルダのコピーを
簡単にするVBAのプログラムについての
ご質問です
たとえばフォルダがみっつ、フォルダA
フォルダB、フォルダCとあるとします
これらのなかには人物のIDと対応するフォルダがあり
それぞれのフォルダには、そのIDの人物に関する書類pdfが
入っています
たとえばフォルダAにそのサブフォルダとして
サブフォルダ1があり、そのなかにpdfファイルがいくつかあります
サブフォルダ2も同様です
サブフォルダ3,4,・・・・
フォルダBではサブフォルダがサブフォルダ_あ サブフォルダ_い,,,
とあり、さらにサブフォルダ_あのなかにIDに対応するサブサブフォルダ11,
12.13とあり それぞれに多種のpdfファイルが入っています
なかには例えばですが、サブフォルダ_いのなかにも、さきほどのフォルダAのなかにあったID2に対応するサブフォルダ2が入っています。
これらをすべて統括するような総合フォルダにIDに対応するフォルダだけで
まとめあげたいという目的なのですが、
上記のフォルダ2のように別の上層階のフォルダから移動するときに、上書きをするか、別名で保存するか問われますが、フォルダ2で統一して、そのかなのpdfファイルに同名のファイルがあれば、片方をそのまま もう一方を---(1)のような
ファイル名に変換して上書きされないようにしたく思います
数百のフォルダがあるので、なんとかコードで作れないか
お尋ねしたく思います
わかりにくい説明ですみません
簡単な図示を添付致します
すみません
宜しくお願い致します
言い方を変えますと、
個人それぞれがID番号を持っていて、ID番号が名称の
フォルダがあり、そのなかにpdfファイルが任意の数、格納されており、
そのID対応のフォルダが、いくつかのフォルダのなかに分散されていて、
その階層は一定ではないですが、IDフォルダは各フォルダの最下層にあるものであり、
最終的にはすべてのIDgフォルダをひとつの統合フォルダにまとめあげたい。
なかには別フォルダのなかに重複して、あるIDフォルダによっては分散しているので
統合するときに上書きを問われてしまう
それを ひとつのIDフォルダに統合し、そのなかのpdfファイルも上書きはしないで
別名保存で そのIDフォルダに保存したい
というわけです
かえってわかりにくくなったかもしれません
宜しくお願い致します
お礼
Forte_さん ご回答、ありがとうございました。 参考にさせて頂きます。