|
>Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
> call ch_no()
>End Sub
>
>Sub ch_no()
> UserForm1.CheckBox1.Value = False
>End Sub
>
>とりあえずこのような感じでやっていきます。
>いろいろ試してみます。
>>オブジェクトの独立性を高めるという事を考慮すると、
>>
>>UserForm1.CheckBox1.Value = False
>>
>>というコードは、UserForm2の外で行うのが良いと思いますよ!!
提示された ch_no というプロシジャーを 別のモジュール(標準モジュール等)に記述したということでしょうか?
私が申し上げた オブジェクトの独立性を高める というのは、
そういうことではありません。
が、今回は よしとしましょう。
モジュールを評価する指標に強度(凝集度)と結合度というものがある
ということを時間があったら調べてみてください。
この先、VBAを勉強されていくなら、いつかまた この件で意見交換を
することもあるでしょう。
|
|