締切済み

Ｂ.xlsだけを開いて、Ａ.xlsの中にあるマクロプログラムを実行するには

2002/12/17 13:11

よろしくお願いいたします。もう少し具体的に言うと、Ａ.xlsというファイルにて、「Test」というマクロプログラムを作りました。これはＡ.xlsのsheet1についてある操作をするものです。同様の操作を行いたいファイルが他にも、Ｂ.xls、Ｃ.xls、Ｄ.xls…とたくさんあります。例えばＢ.xlsについて行うとき、プログラムはＡ.xlsに入っているので、Ａ.xlsとＢ.xlsの両方を開いて、Ｂ.xlsにおいて「ツール：マクロ」から「Ａ.xls！Ｔｅｓｔ」を選んで実行していますが、常にＡ.xlsを開いていなければならないことに疑問を感じます。Ｂ.xlsだけを開いて、Ａ.xlsの中にあるマクロプログラムを実行する手段があるのでしょうか？「アドイン」とかいうものを使えば…という知人がいますが、具体的には知らないそうです。ご存知の方、よろしくお願いします。

tarobei
お礼率50% (176/352)

オフィス系ソフト
回答数3
ありがとう数1

みんなの回答 （3）
専門家の回答

みんなの回答

papayuka
ベストアンサー率45% (1388/3066)

2002/12/17 21:21 回答No.3

こんにちは。処理用ブックを作り、そのブックからＢ.xlsやＣ.xlsを開いてもらうとか。。 Sub aaa() Dim FName, wb As Workbook 　FName = Application.GetOpenFilename _ 　　　　　("XLS (*.xls), *.xls", , "ファイルオープン") 　If FName = False Then Exit Sub 　Workbooks.Open (FName) 　Set wb = ActiveWorkbook 　'開いたファイルに対して何らかの処理　'wb.Worksheets(1).Range("A1") = Date　'この行は例　'マクロのあるファイルを閉じる　ThisWorkbook.Saved = True 　ThisWorkbook.Close End Sub アドインでも個人用マクロブックでも各ＰＣにセットする必要があるのに代わりはないです。勝手に仕込んだらマクロウィルスと同じでしょうし。。。

ログインすると、全ての回答が全文表示されます。

moon00
ベストアンサー率44% (315/712)

2002/12/17 14:06 回答No.2

普遍的に使うことが想定されるなら「個人用マクロブック」に登録してもよいのでは？それですと、Excelを立ち上げたとき、すぐに使える状態になります。 VBEでPERSONAL.xlsにモジュールをコピーすればOKです。でも、あんまり長いマクロだと、やはり#1さんのやり方がいいでしょうね。

ログインすると、全ての回答が全文表示されます。

maruru01
ベストアンサー率51% (1179/2272)

2002/12/17 13:40 回答No.1

こんにちは。maruru01です。マクロによる操作がどのようなものか分かりませんが、むしろA.xlsのみを開いておいて、ファイルを読み込んでそれぞれのファイルに操作を行うように、マクロの内容を変える方がいいのではないでしょうか。 A.xlsの代わりにそのマクロ実行専用のファイルを作り、そのマクロを移行してもいいと思います。ファイルがたくさんあるなら、ループとかで連続処理した方がいいと思いますよ。

質問者

補足 2002/12/17 16:59

ありがとうございます。私の質問の仕方が悪かったかもしれませんので補足させていただきますと、ファイルがたくさんあるといったのは複数の人が同じようなファイルを持っているという意味です。このファイルは定期的に各人が新規に作成していくもので、その都度今回の処理をしないといけないのです。ですので、サーバーにプログラムを置いておいて、各人にそれを使って処理してもらうというようにしたいのですが、みんなに『「Ａ.xls」をまず開いて、そして自分の「Ｂ.xls」を開いて……』というのはどうもスマートじゃないな… サーバーから各人のエクセルのアドインっていうやつに登録なんてことができないのかな？なんて考えたりしていたのです。支離滅裂な文章かも知れませんね…もし可能ならまたお返事ください。

ログインすると、全ての回答が全文表示されます。