Excel VBA 質問スレ Part19

べろべろばー
>>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を処理に渡して分岐させれ