テキストエリアのフォント色を変更する

Question

Excelで私はテキストエリアをセルにリンクしました。セルの値に基づいてフォントの色が変化しています。残念ながら、リンクされたセルが変更されると、テキストエリアのフォントの色は変化しません。テキストエリアを開いてEnterキーを押すと色が変わります。

これを自動化する方法はありますか？それは、すべての単一のテキストエリアを押してEnterキーを押すことが多すぎるためです。

Answer 1

同じシートのActiveXテキストボックスにセルA1をリンクしているとします。

セルA1 = 1の場合はテキストボックスのforecolorを赤にし、それ以外の場合は青色にします。テキストボックスのコードで

：あなたは、セルに入力された値に基づいてテキストエリアの色を設定するには、既存のVBAコードを

Private Sub TextBox1_Change() 
    If Range("A1") = 1 Then 
     Me.TextBox1.ForeColor = vbRed 
    Else 
     Me.TextBox1.ForeColor = vbBlue 
    End If 
End Sub