Question

如何给EXCEL VBA 自定义的函数结果 加颜色

在excel VBA中
Public Function Y(X As Double) As Double
X=990
Y=X+100
End Function

这是excel的自定义函数，计算结果是1090，如何写程序，让1090是红色的。
哪位高手有答案！谢谢！

Answer 1

你的意思是：存放该结果的单元格设置为红色，或者该单元格的文字设置为红色？
你可以通过录制宏，进行设置颜色的操作，然后把这个宏运用到你的相关VBA代码里。
关键是你要在哪里显示这个答案，就在哪里显示为红色，你问问题怎么不切中要害？
那你要把结果写到单元格里去呀？？？
Public Function Y(X As Double) As Double
X=990
Y=X+100
ActiveCell.Value = Y
ActiveCell.Font.Color = vbRed
End Function

Answer 2

我的做法是
Public Function Y(X As Double) As Double
X=990
Y=X+100
ActiveCell.Font.Color = vbRed
End Function