[[20140919171417]] 『アドインからアドインを呼び出す』(かんた) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『アドインからアドインを呼び出す』(かんた)

 質問させて頂きます

 AというアドインからBというアドインの処理を呼び出すということは、下の記述でできるということが分かりました
 Sub test()
     'xlaを開いていないと実行できないので開く
     Workbooks.Open ("C:\Users\test\test.xla")
     'アドインファイル内プログラムの実行
     Application.Run "'test.xla'!subMsg"
 End Sub

 呼び出すプログラムが少なければ上のやりかたでいいのでしょうが、Aから呼び出したいBのアドイン内の処理はかなりの量があります。
 つどつど Application.Run "'test.xla'!subMsg"のような書き方をしなければならないのでしょうか。

< 使用 Excel:Excel2010、使用 OS:Windows7 >


 どのような記述方法ができたら良いと考えているのですか?

 Aアドインにて、Bアドインを参照設定すれば、

 call subMsg

 というように あたかも同じプロジェクトの標準モジュールを呼び出すような書式で
 プロシジャーを呼び出すことも可能ですが・・・。

( ichinose) 2014/09/19(金) 20:15


 ichinoseさん。おはようございます。

 >どのような記述方法ができたら良いと考えているのですか?
 これがそもそも見えていない状態なんです。
 どのようにして呼び出すのがいいのでしょうか…

 AのアドインからBのアドインを参照設定するとはどうすればいいですか?
(かんた) 2014/09/22(月) 08:48

 アドインからアドインの参照設定をするには、
 こんな風に書いてあげるのがいいみたいですね。
 Sub prcAddinsAdd()
    'アドインを追加します
    AddIns.Add Filename:="C:\happy\Book4.xla"
 End Sub
 (http://www.happy2-island.com/excelsmile/smile03/capter00713.shtml を参考にしました。)
 これをAアドインやブックを開いたときに実行されるようにして、閉じるときに参照設定を解除すればいい…のか…
(かんた) 2014/09/22(月) 09:25

 提示されているコードは、私が申し上げている

 「Aアドインにて、Bアドインを参照設定すれば、」という操作を行っているコードではありません。

 コードでも可能ですが、原則 手動操作にて設定を行い、運用するものです。

 方法は、
http://www.asahi-net.or.jp/~ef2o-inue/vba_k/sub04_040_04.html

 この辺りが参考になるでしょうか?

 尚、参照設定される側、ここではBアドインでは、「ツール」---「VBAProjectのプロパティ」
 ユニークなプロジェクト名を付けておくと、便利です。

 >これがそもそも見えていない状態なんです。

 runSP "subMsg"

 このように呼び出しができたら良いのであれば、このような手続きで呼び出しが可能になる
 runSPというプロシジャーを作成すればよいのですけどねえ!!

 参照設定も含めて いろいろ試してみてください。

( ichinose) 2014/09/22(月) 10:54


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.