更改textarea字体颜色

Question

在excel中，我将textarea链接到一个单元格。字体颜色根据单元格值而变化。不幸的是，当链接的单元格被更改时，textarea字体颜色不会改变。当我打开textarea并按Enter键时，颜色正在变化。

有没有办法我可以自动化这个，因为按下每个文本区并按回车是太多的工作。

Answer 1

假设我已将单元格A1链接到同一工作表上的ActiveX文本框。

如果单元格A1 = 1，我希望文本框forecolor为红色，否则为蓝色。

在文本框代码中：

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