|
こんばんわ。
まず、以下にやりたいことを書きます。
============================================
'フォームを開く関数(これはあくまでも例)
Sub FORM_OPEN(FORM_NAME As String)
Dim FormObj As Object
Set FormObj = FORM_NAME 'FORM_NAME = "UserForm1"とする。適当です。
'UserForm1.Showなどのようにフォームを開くのを
FormObj.Show
'変数に置き換え可変にしたいのです。
End Sub
これはエラーになるのは、分かっているのですが、
可変にする方法が探しても見つかりませんでした。
===========================================
フォームのオブジェクト名を変数に渡し、
変数からメソッドを呼び出せるようにしたのです。
方法は他にあると思いますので、ご存知の方
ご教授を宜しくお願いします。
過去ログなども探してみたのですが、
似たような投稿はあったのですが、
似て非なるものでした。
どうぞよろしくお願いいたします。
本当に困っています(;;
|
|