调试的时候总是错误5，无效的过程调用或参数，请大神帮满看一下为什么？
Sub JingGao()
If Application.WorksheetFunction.CountIf(Range("A1,M13"), "=") > 0 Then
MsgBox "有忘记输入的单元格"
End If
End Sub
vba查找区域里是否有空的单元格
答案:3 悬赏:80 手机版
解决时间 2021-02-14 22:25
- 提问者网友：不爱我么
- 2021-02-14 06:40
最佳答案
- 五星知识达人网友：春色三分
- 2021-02-14 08:09
"A1,M13" 中间应该冒号，不是逗号
全部回答
- 1楼网友：鱼芗
- 2021-02-14 09:33
假定你要找的关键字为“ldm029”，单元格对象变量为ra。用一句就行：
set ra = cells.find("ldm029")
注意如果表格中没有这个关键字，ra将被释放。所以如果没找到又不想改变ra，可在前面加一个条件：if not cells.find("ldm029") is nothing then set ra = cells.find("ldm029")
- 2楼网友：玩家
- 2021-02-14 08:25
Sub JingGao()
If Application.WorksheetFunction.CountIf(Range("A1:M13"), "=") > 0 Then
MsgBox "有忘记输入的单元格"
End If
End Sub
测试 OK 了
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯