Excel2000自定义函数
现在的要求是我在A列输入一个编码,然后在B显示价格,C显示颜色,D显示纹路。因为编码很多不好用if语句,所以我就想到自定义函数,但返回多个值的不是很清楚,看到网上说可以自定义Type,所以我做了如下函数:
Type YY
A As Integer
B As String
C As String
End Type
Function GetValue_1(value) As YY
Select Case value
Case "1"
YY.A = 100
YY.B = "黑色"
YY.C = "横纹"
Case "2"
YY.A = 200
YY.B = "红色"
YY.C = "横纹"
Case Else
YY.A = 0
YY.B = "无色"
YY.C = "横纹"
End Select
End Function
函数是定义了,但在列中引用函数时不能正常显示,不知道这样的自定义函数应该怎么引用,谢谢!