こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

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

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

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

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

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

よろしくお願いします。

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

投稿日時 - 2013-09-16 11:15:41

QNo.8266367

暇なときに回答ください

質問者が選んだベストアンサー

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

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

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

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


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

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


>実行ボタンを3つ作って、1つは……

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


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

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

投稿日時 - 2013-09-16 14:11:10

お礼

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

投稿日時 - 2013-09-16 14:27:33

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問