|
▼生茶 さん:
>ご回答頂き大変ありがとうございます。
>2.うまくいきました。(感謝)
ということは、他は駄目だったんですか?
先日もそうだったので、気になるなあ!!
>
>今回、ご教授頂いた内容は「定数」を宣言して値を設定する
>方法でしたが「変動」のある変数の受け渡しは可能でしょうか!?
>(Public OK As Integer で変数宣言しても受け渡しが
> 可能な方法です。)
どちらかというと↑の使い方の方が私は多いです。定数を参照した事はないんです。
例えばブックBook1の標準モジュールに以下のコードがあったとしましょう。
'===========================================================
Public aaa As Integer
'===========================================================
Sub 値セット()
aaa = 1
End Sub
thisWorkbookに
'===================================================
Function get_publicdata() As Integer
get_publicdata = aaa
End Function
ブックBook2の標準モジュールでは、
'===========================================
Sub testtest()
MsgBox Workbooks("book1").get_publicdata
End Sub
とした場合、Book1で「値セット」を実行後、testtestを実行してみてください。
1が表示されるはずですが・・・。
変数の置き場所は、内容によって違ってくるので、可能性として・・・、
BOOK1のThisworkbookに
'====================================================
Public bbb As Integer
としておけば、
BOOK2では、
sub testtest()
msgbox workbooks("book1").bbb
end sub
でも取得できます。設定もできますよ。
sub testtesttest()
workbooks("book1").bbb=1000
end sub
確認してみて下さい。
それと問題があった場合、この後の投稿は、夜になってしまいます。
続きがあったら、どなたかお願いします。
|
|