| 查看: 335 | 回复: 0 | ||
[求助]
vb语言 宏
|
|
运行vb是显示：运行时错误‘6’，溢出 下面是代码 ，麻烦大神解答!!请尽量详细点，本人小白。 Function bValidateLinkageRng(rng As Range) As Boolean Dim i As Integer bValidateLinkageRng = True If rng.Columns.Count < 3 Then bValidateLinkageRng = False Exit Function End If For i = 1 To rng.Rows.Count If Len(rng.Cells(i, 1)) * Len(rng.Cells(i, 2)) * Len(rng.Cells(i, 3)) = 0 Then bValidateLinkageRng = False Exit Function ElseIf Not Application.WorksheetFunction.IsNumber(rng.Cells(i, 2)) Then bValidateLinkageRng = False Exit Function End If Next End Function |
回复此楼» 猜你喜欢
三无产品还有机会吗
已经有6人回复
-
垃圾破二本职称评审标准
已经有7人回复
-
投稿返修后收到这样的回复，还有希望吗
已经有7人回复
-
博士申请都是内定的吗？
已经有14人回复
-
谈谈两天一夜的“延安行”
已经有13人回复
-
氨基封端PDMS和HDI反应快速固化
已经有11人回复
-
之前让一硕士生水了7个发明专利，现在这7个获批发明专利的维护费可从哪儿支出哈？
已经有11人回复
-
论文投稿求助
已经有4人回复
-
Applied Surface Science 这个期刊。有哪位虫友投过的能把word模板发给我参考一下嘛
已经有3人回复