excel中调用自己定义函数问题

[复制链接]
查看11 | 回复1 | 2008-7-20 11:34:59 | 显示全部楼层 |阅读模式
在VBA中自定义函数为:
Function Result(a)

If (a = 1) Then

Result = "优"

ElseIf (a = 2) Then

Result = "良"

ElseIf (a = 3) Then

Result = "中"

ElseIf (a = 4) Then

Result = "及格"

Else

Result = "不及格"

End If
End Function
在一个单元格中输入:
=Result(1),然后按回车,提示"当前使用的函数在Microsoft Excel中无法使用",怎样解决?

回复

使用道具 举报

千问 | 2008-7-20 11:34:59 | 显示全部楼层
Result与VBA的内部关键字重叠,将Result换个名称就可以了如将所有的Result都换成Res
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行