エクセルで個人用マクロの配布方法

このたびわたしが作成した業務用の簡単なマクロを社内の他部門（遠隔地）の10名ほどのかたがたにメールで配布して使っていただくことになりました。

自分では個人用マクロブックに登録し、任意のエクセルのシートに対して使用していたものです。
一応そのマクロだけをエクスポートしてModule1.basというファイルは作ったのですが、これまでマクロそのものを配布したことがないので送った先の人にどうインポート方法を説明したらよいのかわかりません。多分マクロはよく知らないひとたちのはずです。
いい説明方法があれば教えてください。

No.3 回答者： X-trail_00 回答日時： 2006/06/23 12:07

＃２です

>よって１と２の合作
以降がその方法だったのですが

'モジュールファイルを削除する
Application.VBE.ActiveVBProject.VBComponents.Remove Application.VBE.ActiveVBProject.VBComponents("Module1")

'モジュールをエクスポートする。
Application.VBE.VBProjects("test").VBComponents("Module1").Export ("C:\Module1.bas")

'エクスポートされたモジュールをインポートする。
Application.VBE.ActiveVBProject.VBComponents.Import ("C:\Module1.bas")

上記が少し助けになれば。

また#1さんの答えの下記URLもヒントになります。
http://itpro.nikkeibp.co.jp/article/COLUMN/20060 …

私自身も業務で必要に迫られてネットを調べて作ったので
質問者さんも自分のしたいことに合わせて検索して覚えるのも
勉強です。　必ず自分の実力になります。

ヒント
送るブックのマクロ
　新しいワークブック作成
　置く場所は個人用マクロ保管場所
　ファイル名は　personal.xls
　送るブックに予めmodule1を入れておく
　それをエクスポートして
　新しく作成したファイルにインポート
　新しく作成したファイル保存
　全部閉じる。
と言った流れでしょうか

この回答へのお礼

ありがとうございます。
ヒントを参考に下記のように作ってみましたが、最初のApplication.VBE.VBProject("DONYU").のところで「実行時エラー438、オブジェクトはこのプロパティまたはメソッドをサポートしていません」となってしまいます。WINDOWS2000、エクセル2000です。
もう一点、うまく行った場合、相手のPCにすでにpersonal.xlsが存在していたらどうなるのでしょうか？

Sub donyu()
uz = InputBox("あなたのユーザー名を入力してください。")
Application.VBE.VBProject("DONYU").VBComponents("Module1").Export ("C:\Module1.bas")
Set wb = Workbook.Add
wb.SaveAs Filename:= _
"C:\Documents and Settings\" & uz & "\Application Data\Microsoft\Excel\XLSTART\PERSONAL.xls"
Application.VBE.VBProject("PERSONAL").VBComponents.Import ("C:\Module1.bas")
wb.Close
Set wb = Nothing
ThisWorkbook.Close (False)
End Sub

お礼日時：2006/06/23 13:16

No.2 回答者： X-trail_00 回答日時： 2006/06/23 10:37

１・インポート機能を作成する。

２・PERSONAL.XLSを作成して所定の場所に置いてもらう
モジュールで配布しないほうがいいです
それをインポートしても機能を使えるのはインポートした
ファイルだけになります。

よって１と２の合作
personal.xlsを所定の場所に置くマクロを持った
xlsを作成してシートにボタンでも作っておく
ボタンクリックすると個人用マクロの場所に
そのpersonal.xlsをコピーする。
コピーじゃなくても新規で作成するようにも出来ます。

ただxlsをそのまま送付するとウイルスと間違われて
セキュリティソフトにはじかれる場合もあるので
圧縮して送ってください。

この回答へのお礼

さっそくありがとうございます。

> よって１と２の合作

その方法をご教示いただけませんでしょうか？

お礼日時：2006/06/23 11:39

No.1 回答者： hana-hana3 回答日時： 2006/06/23 10:31

＞いい説明方法があれば教えてください。

１．スクリーンキャプチャなどを多用したインポート用の説明書と共に配布

２．インポート用のＶＢＡを作成したブックを配布し、実行して貰う。

３．アドインとして配布し、手作業でインストールと登録。
４．　　　　　〃　　　　　インストール用のマクロで自動登録。

など、いくつか方法があります。

http://www.asahi-net.or.jp/~ef2o-inue/menu/menu0 …
http://itpro.nikkeibp.co.jp/article/COLUMN/20060 …

この回答へのお礼

さっそくありがとうございます。
インポート用のＶＢＡを作成したブックを配布し、実行して貰うのが一番相手にはわかりやすいですよね。

ただ、残念ながらわたしにはそれを作成するスキルがありません。
参考URLも見ましたが、インポート用VBAは見当たらないようです。
作成のため参考になるサイトはないでしょうか？

お礼日時：2006/06/23 11:36