Excel VBA質問箱 IV

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

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


957 / 13644 ツリー ←次へ | 前へ→

【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 ラジオボタン1_Click()
  ここで参照
 End Sub

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

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

引用なし
パスワード
   ▼ぴょん さん:
(Public変数は使えないようなので)

1.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

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

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

引用なし
パスワード
   ▼β さん:
1.の方法でうまくいきました。
ご教授ありがとうございます。

957 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free