こんなことマクロで出来ますか

質問

普段は簡単なマクロしか使ったことありませんが以下のようなことって出来るのでしょうか？

まず、
２つのファイルがあります。＜A・B＞
＜A＞は入力用として（データ）や（雛型）で入力した情報が＜B＞に閲覧用としてリンクされています。

＜A＞の（データ）に開催会場のデータ（札幌、東京、大阪、福岡）を入力すると
＜B＞に列ごとにリンクされます。
＜B＞：A1 札幌　B1 東京　C１ 大阪　D１ 福岡

マクロボタンをクリックすると
＜A＞の（雛型）を新しいブックにコピーして各開催会場ごとのファイル名がつきます。＜C＞：札幌～＜F＞：福岡
＜C＞：札幌で入力したデータが＜B＞のA列へ
＜D＞：東京のデータは＜B＞のB列へ
　　：
　　：
それぞれ会場ごとのファイルが＜B＞の列ごとにリンクします。

このようにセルに入力したものがファイル名となって新しいブックを作り、そのデータを別のファイルの列ごとにリンクする…なんてことは出来ますか？

回答No.2

sacoman · ベストアンサー

マクロで可能な範囲だと思います。
色々な方法が考えられますが、以下にちょっとしたヒントをかいておきます。

※開催地のシート名をつけて別途保存する手順としては、
以下のとおり。状況に合わせて、ファイル名に保存するパス込みで記述しておくといいですね。また、新規雛形のシートをコピーしたときのシート名にも注意です。シート名を開催地の文字列に変更する際に、元のシート名を変数なりに取得してシート名変更対象を間違えないようにすることも必要です。Activesheetオブジェクトをうまく使うのがいいかもしれません。

(1)変数（ここではkaisai）を設定して変数に、
開催地の文字列をセットし、シート名対象のシート名に
kaisaiにセットされた値をセットする。

　　Dim kaisai As String
kaisai = Range("開催地入力セル番地").Value
Sheets("変更対象シート名").Name = kaisai

(2)開催地名に変更したシートを新規ブックとして移動し、
ファイル名（変数kaisaiの値）をつけて保存。

　　Sheets(kaisai).Move
　　ActiveWorkbook.SaveAs Filename:="kaisai" & ".xls"

※それぞれ保存したブックにリンクを張る方法は、変数kaisaiに開催地の文字列がセットされている値を再利用し、リンクを張りたいセルにちょくせつ参照式を入力するマクロを作ってやればいいと思います。以下のような感じでしょうか・・・。

　　　Range("参照色入力セル").Value="[" & kaisai & "]" & kaisai & "'リンク先セル番地"

あとは、ファイルを上書き保存し、ファイルを閉じるコードを記述してＯＫ。

細かいVBAに関することは参考URLで質問しても詳しく答えてもらえると思いますよ。OFFICEユーザーにはお勧めのサイトです。

参考URL：

http://www.moug.net/

お礼

ありがとうございます。
む、むずかしそうですね。
ＶＢＡが把握できていないので困難になりそうです。
でも出来ないことじゃなさそうなので頑張ってみます。
参考ＵＲＬをみて週末によ～く勉強してみます。

回答No.3

imogasi

もう＃２sakomanさんの答えが出ているようで、その後から言うのもおかしいと考える方及びdenndeさんにはすみません。読む方が判り易いようにと思いますので下記u－ｙの疑問をよろしく。
ブックＡ－データ入力項目部＋雛型部（多分入力項目部と
　　　　　ほぼ同じ。＋コマンドボタン
　　　　　入力する場所は、会場別にセルが別ですか？
　　　　　（u）。
　　　　　会場が別でも多分同じセルに同じ項目は入力する
　　　　　のですよね？（ｖ）各行に項目見だしがあり、
　　　　　対応する入力行（セル）があるような。
ブックＢ－会場別情報の集約版ですか？（ｗ）
　　　　　会場別情報が列ごとに記録されているのですね。
　　　　　Ａ列－札幌、Ｂ列－東京、・・・
　　　　　Ｃ以下のブックのほかにＢがある理由が伝わらない。
ブックＣ、Ｄ以後
　　　　　Ｃは札幌、Ｄは東京、Ｅは大阪、Ｆは福岡ですね？
　　　　　札幌で次回開催はないのですか。ありそう。あればそのときは
　　　　　ブックＧに記録するのですか。（ｘ）
　　　　　ブックＣ，Ｄ、Ｅ、Ｆの項目内容は基本的にＡの雛　　　　　型をコピーしたものですか。？（ｙ）
私見ではデータベースをＢとＥ以下ブックに分けるのでなく、
データ記録は１ブックのあるシートに決め、「１催し」１行毎に記録して、見たいときに決まったフォームや専用シートに引っ張ってきて表示する方式が多い（簡単になる）のでは。ＳＱＬが使えるデータベース記録方式やＭＳアクセスなどからの類推です。記録単位は列方向に流さないで、行方向に流すのが主流のように思いますが？

補足

週末にかかってしまい返事が遅くなりました。すみません。（自宅にはＰＣがないもので…）

まず質問に対してですが
ブックＡ－データ入力項目部＋雛型部（多分入力項目部と ほぼ同じ。＋コマンドボタン 入力する場所は、会場別にセルが別ですか？ （u）。
―そうです。日にちと会場一覧のようなものを入力するとブックＢの会場別情報に列ごとに会場名がはいるようにリンクされています。

会場が別でも多分同じセルに同じ項目は入力する のですよね？（ｖ）
各行に項目見だしがあり、対応する入力行（セル）があるような。
―ブックＡの雛型を使用しますので会場ごとの入力は全て同じセルに数値のみになります。

ブックＢ－会場別情報の集約版ですか？（ｗ） 会場別情報が列ごとに記録されているのですね。 Ａ列－札幌、Ｂ列－東京、・・・
Ｃ以下のブックのほかにＢがある理由が伝わらない。
―全体の売上を１枚で見たいので各ブック（Ｃ以下）の各商品の合計を１枚にした集約版ということです。

ブックＣ、Ｄ以後
Ｃは札幌、Ｄは東京、Ｅは大阪、Ｆは福岡ですね？
札幌で次回開催はないのですか。ありそう。あればそのときは
ブックＧに記録するのですか。（ｘ）
―説明が全然足りませんでしたね。例えばコンサートツアーがあったとして、ツアーで販売しているグッズ等の売上管理をしたいのです。
ですからツアー全体の日程予定が開催ということになり日付で１列としたものです。
次回札幌があったとしても別の日ですので他の列に入力されるようになっています。

ブックＣ，Ｄ、Ｅ、Ｆの項目内容は基本的にＡの雛型をコピーしたものですか。？（ｙ）
―そうです。雛型なので丸っきりのコピーです。
雛型には出品する一覧があり何個売れたか数値のみ入力するようになっています。
他に足りなくなった商品の発注や営業に配布したりする持出管理などの情報がすべて数値のみ入力すればブックＢに在庫や売上の合計されたものが会場ごとにわかる一覧というものを作りたいのです。

一回のツアーつき、２０～３０くらいで、商品数も１５０～２００ほどの種類があります。
ツアーごとに開催地や商品も違い、ブックＡのデータ入力で開催予定の情報やツアーで出品する商品のリストを入力すると、雛型に出品される商品が行に出され、マクロを押すと会場分だけのシートが作成されブックＢの列ごとにデータが反映されるか？ということです。

見る側は先にブックＢをみて会場ごとの詳細を見たい人がＣ以下の会場ブックを見るという形になります。

回答No.1

osamuy

できるできないで言えば、「できる」だと思います。

この手のものは、「マクロの記録を開始して、一通りの作業を行なう。記録したマクロをVBEditorで開いて、余分なコードの削除、決め打ちになっている部分を変数で汎用化、といったブラシアップを行う」というアプローチで、それなりのものが出来ます。

もちろん、VBAについての知識が要求されますので、どうしても手が出ないであれば、分かる友人に頼んで作ってもらうのが、手っ取り早いでしょう。
晩飯1回分くらいかな。

お礼

ありがとうございます。
やはりＶＢＡですか…
マクロは使うようになって日は浅いので、まだＶＢＡが把握できてないんです。
なんとな～くはわかるんですが、難しいです。。。
周りには、マクロを使っている友人がいないのでもう少し自分で頑張ってみます。