|
▼やまぐち さん:
>ブック間で変数を共有したいのですが
ブック間で変数や関数を共有するためにVBAで用意されている機能は参照設定です。
みなさん参照設定をご存じないのかな...
手順は以下。
アドインブック(A)のオブジェクト名をユニークな名前に変更して保存。例→VBAProject_A
他の個々のブック→(B)は、[VBE]-[ツール]-[参照設定]で VBAProject_A にチェックして保存。
'(A)標準モジュール
Option Explicit
Public wk_dousaj(5) As String
Public wk_kobetu(5) As String
Sub AAAAAA()
wk_dousaj(1) = "具体値1"
wk_dousaj(2) = "具体値2"
wk_dousaj(3) = "具体値3"
wk_dousaj(4) = "具体値4"
wk_dousaj(5) = "具体値5"
End Sub
'(B)標準モジュール
Option Explicit
Sub BBBBBB()
AAAAAA
wk_kobetu(1) = wk_dousaj(2)
wk_kobetu(2) = wk_dousaj(4)
Debug.Print wk_kobetu(1), wk_kobetu(2)
End Sub
|
|