加上一个IFERROR函数试试呢！
With WorksheetFunction
a=.IFERROR(.FIND(Chr(10),I),0)
If a =0 then
zuihou=“s”
Else
zuihou=“b”
End If
End With
把判断值指向0来判断可能就可以了。
没有电脑没有法测试。
Function zuihou(rg As Range)
Dim a
Application.Volatile True
Set a = rg.Find(Chr(10))
If a Is Nothing Then
zuihou = "s"
Else
zuihou = "b"
End If
End Function
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024