フォームのイベントを標準モジュールから呼び出す

質問

フォームのイベントを標準モジュールから呼び出す事は出来ないのでしょうか？
ちなみにアクセスです。
例えば、
Private Sub Form_Load()
MsgBox "test"
End Sub
というのはフォームを開いたときにしか発生しないですよね。

でもフォームを開いている状態でForm_Loadと全く同じ事をしてほしい時は
どうすればいいですか？

標準モジュールで
Sub a()
Call Form_フォーム1.Form_Load
End Sub
としてみましたが、メソッドまたはデータ メンバが見つかりません。 (Error 461)になりました。

MsgBox "test"
だけなら、
Sub a()
MsgBox "test"
End Sub
にすりゃいいじゃん！って思われがちですが、
実際はForm_Loadイベントにはたくさんのコードが書かれています。

標準モジュールからイベントの呼び出しを教えてください。

回答No.1

tsubuyuki · ベストアンサー

ヒントです。

Private で宣言された変数は、書かれたモジュール内だけで有効です。
Public で宣言された変数は、そのＤＢファイル（ほぼ）全てで有効です。

以下、補足です。

要するに・・ＤＢファイルの標準モジュールに、例えば
Public Sub F_Open()
　　　　MsgBox "開けゴマ"
End Sub
などと書いておいて、
フォームを開くタイミングでこれを呼び出します。
Private Sub Form_Open(Cancel As Integer)
'または Private Sub Form_Load()　でもＯＫ。ここは好みで。
　　　　Call F_Open
End Sub
こんな感じ。
同様に標準モジュールから
Sub a()
　　　　Call F_Open
End Sub
でも呼び出せますね。

厳密には違うと怒られそうですが、
使い回したいＳｕｂは、標準モジュールにＰｕｂｌｉｃで宣言する
とバッサリ覚えて、ちょぃちょぃ軌道修正していくのが良いかもですねぇ。
まぁ、モノと処理量に依りますけどね。

お礼

なるほど。標準モジュールのサブプロシージャーにしちゃえばいいのですね。