怎么在EXCEL里定义一个功能为判断一个数为质数还是合数的函数啊

想在EXCEL里自定义一个函数,功能为判断单元格内的数字是质数还是合数?请问该怎么弄啊 谢谢

同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:
自定义函数:
Function ZHSHU(x As Long) As String
Dim i As Long
If x = 1 Then ZHSHU = "??": Exit Function
If x = 2 Or x = 3 Then ZHSHU = "质数": Exit Function
For i = 2 To Int(Sqr(x))
If Int(x / i) = x / i Then
ZHSHU = "合数"
Exit Function
Else
ZHSHU = "质数"
End If
Next i
End Function
回到Excel中,在某单元格输入=ZHSHU(A1) 就可以返回A1是质数还是合数。

也可以不用自定义函数,直接输入 =IF(A1=1,"??",IF(OR(A1=2,A1=3),"质数",IF(OR(INT(A1/ROW((INDIRECT("2:"&INT(SQRT(A1))))))=A1/ROW((INDIRECT("2:"&INT(SQRT(A1)))))),"合数","质数")))
但要同时按Ctrl、Shift、Enter(数组公式)
温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-10-21
if条件语句判断
相似回答