userform/sheetオブジェクトで公開変数を使用できるようにする

Question

Excelスコープのさまざまな種類の変数スコープに関するページを最後の1時間読んでいますが、スコープの問題に対処する明確なドキュメント参照が見つかりませんでした。それはそのような古典であると確信しています。ああ、ここに行く。

私は1枚のシートと1つのユーザーフォームを含むブックを持っています。私はシートの第1列に座っている学生のリストを持っています。私はしたいと思います：students_listという名前のいくつかのグローバルコレクション変数に

• 負荷このリストをアップ（私はこのはThisWorkbookオブジェクト内のワークブック・オープン（）プロシージャを使用してください）
• にstudents_listの内容を使用します
• 私のユーザーフォームにリストボックスを初期化し、私のユーザーフォーム上のボタンは、私は必要なすべてがから見ている変数である

上でクリックされたときにstudents_listから要素を削除します私のユーザーフォームの手順の中で、そしてThisWorkbookオブジェクトの中から。

私はシートのコード内で、シートフォームのコードで、グローバルフォーム専用のモジュールでThisWorkbookのuserformで宣言しようとしました...私はちょうど正しい方法を見つけることができませんstudents_list変数はどこからでも見ることができます。

私には何が欠けていますか？ -/

Answer 1

あなたのPublic変数の宣言をモジュール内に置きます（メニューから[挿入]/[モジュール]を使用してメニューを作成してください）。 1）。スコープはプロジェクト全体に拡張されます。モジュール中のSO

（例えばModule1が）持っている：

Public foo As Integer 

、ワークシート（たとえばシート1）のコードでは、持っている：

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
    foo = 4 
    MsgBox "foo set to 4" 
End Sub 
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) 
    MsgBox "foo = " & foo 
End Sub 

---

をあなたが宣言を配置した場合ThisWorkbookのコードはThisworkbook.fooと参照する必要があります。なぜなら、コードのどの部分からもアクセス可能ですが、それはそのThisWorkbookオブジェクトに固有の変数ですからです。 ThisWorkbookのコードでそう

は、持っている：

Public foo As Integer 

、ワークシート（たとえばシート1）のコードでは、持っている：

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
    ThisWorkbook.foo = 4 
    MsgBox "foo set to 4" 
End Sub 
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) 
    MsgBox "foo = " & ThisWorkbook.foo 
End Sub