| 
    
     |  | おお! できました!
 ichinoseさん本当にありがとうございました!
 たすかりました。
 また質問があるかと思いますので、
 その時も宜しくお願いいたします。
 
 失礼しました。
 
 ▼ichinose さん:
 >▼ノキ さん:
 >こんばんは。
 >
 >
 >>まず、以下にやりたいことを書きます。
 >>============================================
 >>'フォームを開く関数(これはあくまでも例)
 >>Sub FORM_OPEN(FORM_NAME As String)
 >>Dim FormObj As Object
 >>
 >>Set FormObj = FORM_NAME 'FORM_NAME = "UserForm1"とする。適当です。
 >>
 >>'UserForm1.Showなどのようにフォームを開くのを
 >>FormObj.Show
 >>'変数に置き換え可変にしたいのです。
 >>
 >>End Sub
 >>
 >>これはエラーになるのは、分かっているのですが、
 >>可変にする方法が探しても見つかりませんでした。
 >>
 >>===========================================
 >>
 >>フォームのオブジェクト名を変数に渡し、
 >>変数からメソッドを呼び出せるようにしたのです。
 >>
 >>方法は他にあると思いますので、ご存知の方
 >>ご教授を宜しくお願いします。
 >>
 >>過去ログなども探してみたのですが、
 >>似たような投稿はあったのですが、
 >>似て非なるものでした。
 >>
 >>どうぞよろしくお願いいたします。
 >>本当に困っています(;;
 >
 >Jakaさんの
 >
 >http://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=18804;id=excel
 >
 >これを応用されてはいかがですか?
 
 |  |