Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

978 / 13665 ﾂﾘｰ

←次へ　｜　前へ→

▼

【77286】WorkbookプロシージャとWorksheetプロシージャのｲﾝﾀﾌｪｰｽ ぴょん 15/6/30(火) 22:30

【77287】Re:WorkbookプロシージャとWorksheetプロシ... β 15/6/30(火) 22:54

【77288】Re:WorkbookプロシージャとWorksheetプロシ... ぴょん 15/6/30(火) 23:45


	【77286】WorkbookプロシージャとWorksheetプロシ...

ぴょん - 15/6/30(火) 22:30 -


	引用なし

	パスワード

Workbookプロシージャ（Workbook_Open）で算出した値を、Worksheetプロシージャに引き渡すにはどのようにしたらよいのでしょうか？（Public変数は使えないようなので）

■Workbookプロシージャ

　Private Sub Workbook_Open()
　　ここで設定
　End Sub

■Worksheetプロシージャ

　Private Sub ラジオボタン１_Click()
　　ここで参照
　End Sub

　Private Sub ラジオボタン２_Click()
　　ここでも参照
　End Sub


	【77287】Re:WorkbookプロシージャとWorksheetプロ...

β - 15/6/30(火) 22:54 -


	引用なし

	パスワード

▼ぴょんさん：
（Public変数は使えないようなので）

１．Workbookモジュールにモジュールレベル変数を【Public】で規定して
　　シートモジュールでThisWorkbook.変数名　で参照

Option Explicit

Public arg As String

Private Sub Workbook_Open()
　　arg = "Hello"
End Sub

Option Explicit

Private Sub OptionButton1_Click()
　　MsgBox ThisWorkbook.arg
End Sub

２．標準モジュールでPublic変数を規定してThisWorkbookモジュールで設定、
　　シートモジュールでふつうに参照。


	【77288】Re:WorkbookプロシージャとWorksheetプロ...

ぴょん - 15/6/30(火) 23:45 -


	引用なし

	パスワード

▼β さん：
１．の方法でうまくいきました。
ご教授ありがとうございます。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

978 / 13665 ﾂﾘｰ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free