販売管理ソフトを作る - 「動的な画面作成時のイベント取得方法」の訂正

フリー 販売管理 Excel ユーザフォーム

「動的な画面作成時のイベント取得方法」の訂正

「動的な画面作成時のイベント取得方法」では、イベント処理用のクラスを、別に作成していたが、
そんなことをしなくても済むようです。

■ フォームの呼び出し側



Public Sub Main()

    Set UserForm3.cmdExit = UserForm3.Controls.Add("Forms.CommandButton.1", "cmdExit")

    objForm.Show

End Sub
■ フォーム


Option Explicit
Public WithEvents cmdExit As MSForms.CommandButton
Private Sub cmdExit_Click()

    Unload Me

End Sub