エクセルマクロ 次のようなプログラム教えてください

質問

エクセルのマクロで、次のようなことをしたいと思っていますが、
素人でわかりません。
教えていただけますか。

----------------------------------
ｏ動かしているファイルをa.xlsとします。
　a.xlsは、3行目からA列に名前、B列～Ｄ列にデータが入っていて、
　各行ごとのファイルを作りたい。（行数は決まっていない）
　なお、セルE１にある文字が入っている。
ｏ各ファイルは、原紙としてgensi.xlsとして保存されているファイルに、
　a.xlsのB～D列のものを入力したものを作りたい。
　（B～D列のデータは、gensi.xlsのそれぞれセルC7・C８・C９に入力する）
　　gensi.xlsは、a.xlsと同じフォルダにあります。
ｏ作成場所は、「C:\date」の中に、セルE1にある文字のフォルダ、A列に
　ある名前のフォルダに作りたい。
（セルＥ1の文字のフォルダは、マクロを初めて実施するときは無いと思います
　が、2回目からは存在すると思います。A列の名前のフォルダはマクロ実施時
　にはありません。作成するファイル名は、Ａ列の名前と同じ（フォルダ名と同じ）.xls
にします。）

ｏ実行ボタンを３つ作って、１つは今選択されている行のフォルダ・ファイルを作る。
　2つ目は数字を入力させて、今選択されている行から入力した数字の行までを一括
　で作成する。
　３つ目は、3行目から現在入力されている行すべてを一括で作成する。

-------------------------------
上記のことをしたいと思っています。

よろしくお願いします。

駄文ですみません。
なお、エクセルは古いバージョンでエクセル2000です。

回答No.2

MarcoRossiItaly · ベストアンサー

分量が少ない内容ならパッと答えてくださる方もいらっしゃるんでしょうが、ちょっと多すぎですね。その上、細かい情報が全然載っていないので、少なくとも多くの仮定をしなければ、完全なコードを示せる人はいないでしょうね。

ファイルを開くのは Workbooks.Open メソッド。フォルダが異なるときはファイル名をフルパスで記述。シートを追加するのは Worksheets.Add。コピペは、Range.Copy Destination:=......。初めて保存するには、Workbook.SaveAs。

全部 VBE のヘルプで見れますし、インターネットにもたくさんの情報がありますから、調べてみましょう。

そのほか実際のコーディングでは、いろいろ変数を宣言したり、より効率的な処理となるよう手順を工夫するといった要素もあります。際限がないので、説明は省略します。

＞作成場所は、「C:\date」の中に、セルE1にある文字のフォルダ、A列にある名前のフォルダに作りたい。

文字列を「&」でつないで、パスを作ってください。もちろんセルのバリュープロパティの文字列を使っても構いません。

＞実行ボタンを３つ作って、１つは……

メニューバーから、フォームコントロールのボタンなどを挿入。出現する「マクロの登録」ダイアログで、使いたいマクロを指定。後からボタンを右クリックでも登録できます。

質問者さんだけじゃないとは思いますが、ここは業務委託ではなく質問・回答をする場です。質問される方にも、相応の努力を期待したいところです。努力しても知識がないためにあまり凄いシステムは作れないとしても、スキルがまだその水準に達していないのであれば、ある程度仕方のないことです。たとえコードだけ人から教わっても、自分でメンテナンスもできませんね。

ちょっとでも自分でコードを書いてみて、それを載せて質問してみてはいかがでしょう。いきなり最終目標までは行けないかもしれませんが、身にはなるでしょう。もちろん今回のご質問はいったん閉じてからですが。

お礼

ありがとうございました。参考にします。