Ｐａｇｅ 671 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼別のUserFormにあるコードの実行 １２３ 03/2/4(火) 13:51 ┗Re:別のUserFormにあるコードの実行 Jaka 03/2/4(火) 14:20 ┗Re:別のUserFormにあるコードの実行 １２３ 03/2/4(火) 15:42 ─────────────────────────────────────── ■題名 ： 別のUserFormにあるコードの実行 ■名前 ： １２３ ■日付 ： 03/2/4(火) 13:51 -------------------------------------------------------------------------
| どうしても分からないので、教えてください。 UserForm1とUserForm2があり、 UserForm1に private SUB A_Click() があります。 UserForm2で リストBOXをダブルクリックすると、 UserForm1の private SUB A_Click() を実行するように したいのですが、分かりません。 どうぞご教示願います。 Private Sub リスト_DblClick(ByVal Cancel As MSForms.ReturnBoolean) UserForm1.B_選択印刷 End Sub これじゃ ぜんぜんダメですよね。 |
| こんにちは。 この >private SUB A_Click() って、なんですか？ CommandButton1のオブジェクト名をAに変更したって事ですか？ だとしたら、こんな感じで良いんじゃないかと．．．。 Private Sub リスト_DblClick(ByVal Cancel As MSForms.ReturnBoolean) UserForm1.A = True End Sub メインプログラムを標準モジュールに書いて、各自それを呼び出す方法ってのもありますが。 （コードの内容にもよるけど。） |
| ▼Jaka さん： こんにちは。 >この >>private SUB A_Click() >って、なんですか？ >CommandButton1のオブジェクト名をAに変更したって事ですか？ >だとしたら、こんな感じで良いんじゃないかと．．．。 その通りです。 すみません。急いでいたもんですから．．． >Private Sub リスト_DblClick(ByVal Cancel As MSForms.ReturnBoolean) >UserForm1.A = True >End Sub 上記で出来ました。ありがとうございました。 >メインプログラムを標準モジュールに書いて、各自それを呼び出す方法ってのもありますが。 >（コードの内容にもよるけど。） 標準モジュールのやり方は知っていますが、 今回は標準モジュールを使わない方法を選択してしまったのです。 ご丁寧にありがとうございました。 |