24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 376  |  回复: 0

goodwoniu

新虫 (初入文坛)

[求助] 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
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 goodwoniu 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 学硕274求调剂 +7 Li李鱼 2026-03-26 7/350 2026-03-28 14:59 by GouQ
[考研] 085600,材料与化工321分求调剂 +9 大馋小子 2026-03-28 9/450 2026-03-28 14:56 by 神马都不懂
[考研] 求调剂 +3 QiMing7 2026-03-25 4/200 2026-03-28 14:30 by QiMing7
[考研] 一志愿太原理工安全工程300分,求调剂 +4 0857求调剂. 2026-03-24 5/250 2026-03-28 13:45 by 求知若渴lz
[考研] 283求调剂 +7 A child 2026-03-28 7/350 2026-03-28 12:05 by zllcz
[考研] 321求调剂 +6 璞玉~~ 2026-03-25 6/300 2026-03-28 11:09 by WWM123
[考研] 【求调剂】085601材料工程专硕 | 总分272 | +6 脚滑的守法公民 2026-03-27 6/300 2026-03-28 11:02 by gjlllb
[考研] 311求调剂 +3 希望上岸阿小杨 2026-03-23 3/150 2026-03-28 07:57 by 热情沙漠
[考研] 291求调剂 +6 HanBeiNingZC 2026-03-24 6/300 2026-03-28 07:55 by baoball
[考研] 275求调剂 +10 jjjjjjjjjjl 2026-03-27 10/500 2026-03-27 23:47 by barnett0632
[考研] 调剂推荐 +5 清酒714 2026-03-26 6/300 2026-03-27 11:12 by 不吃魚的貓
[考研] 0703化学一志愿南京师范大学303求调剂 +3 zzffylgg 2026-03-24 3/150 2026-03-27 10:42 by shangxh
[考研] 071000生物学求调剂,初试成绩343 +6 小小甜面团 2026-03-25 6/300 2026-03-26 23:01 by 不吃魚的貓
[考研] 333求调剂 +6 wfh030413@ 2026-03-23 6/300 2026-03-26 22:45 by 学员8dgXkO
[考研] 一志愿河工大 081700 276求调剂 +4 地球绕着太阳转 2026-03-23 4/200 2026-03-26 14:27 by zzll406
[考研] 寻找调剂 +5 倔强芒? 2026-03-21 8/400 2026-03-26 13:25 by 0906ljy
[考研] 一志愿上海交大生物与医药专硕324分,求调剂 +6 jiajunX 2026-03-22 6/300 2026-03-25 23:05 by licg0208
[考研] 300求调剂,材料科学英一数二 +5 leaflight 2026-03-24 5/250 2026-03-24 16:25 by laoshidan
[考研] 269求调剂 +4 我想读研11 2026-03-23 4/200 2026-03-23 21:25 by pswait
[考研] 求老师收我 +3 zzh16938784 2026-03-23 3/150 2026-03-23 12:56 by ztnimte
信息提示
请填处理意见