Excel VBA 質問スレ Part19at TECHExcel VBA 質問スレ Part19 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト294:デフォルトの名無しさん 11/06/07 22:11:53.16 >>293 WithEventsでぐぐれ 295:問題マン 11/06/07 22:47:35.04 べろべろばー >>287 IfでやるならInterior.ColorIndexを何度も参照しないように いったん変数に入れたほうが無駄がないぜ！ >>293 新しくClass1を挿入 Public WithEvents mytx As MSForms.TextBox Public Sub init(a) Set mytx = a End Sub Private Sub mytx_Change() 処理 End Sub グローバルにインスタンス作成 Dim myclass(10) As New Class1 以下を作動させる（名前違ったら適当に変えてね） For a = 1 To 10 Call myclass(a).init(Sheet1.OLEObjects("TextBox" & a).Object) Next で試したら最初はうまくいったけどいじってたら効かなくなったぜ！ 変数myclassを保持してる間だけ有効 テキストボックスごとに処理を変えるならMe.mytx.Nameを処理に渡して分岐させれ 296:デフォルトの名無しさん 11/06/07 22:51:16.71 >>295 やはりクラスモジュールを使用するのですか。 検索して勉強しても いまいちクラスが理解できないんですよね。 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch