| |
▼生茶 さん：
>ご回答頂き大変ありがとうございます。
>２．うまくいきました。(感謝)
ということは、他は駄目だったんですか？
先日もそうだったので、気になるなあ！！
>
>今回、ご教授頂いた内容は「定数」を宣言して値を設定する
>方法でしたが「変動」のある変数の受け渡しは可能でしょうか！？
>（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
確認してみて下さい。
それと問題があった場合、この後の投稿は、夜になってしまいます。
続きがあったら、どなたかお願いします。
|
|
ichinose
- 04/5/25(火) 11:46 -
