VBA## on error go to多次跳转问题## 求教

VBA## on error go to多次跳转问题## 求教

代码如下:

  1. Function Owner(CPN as string,WholePN as range,Versionless as range) as string
  2. Err.Clear
  3. On Error GoTo Line1
  4. Owner = WorksheetFunction.Vlookup(CPN, WholePN, 3, 0)
  5. GoTo FinalOwner
  6. Line1:
  7. Err.Clear
  8. On Error GoTo Line2
  9. Owner = WorksheetFunction.Vlookup(Left(CPN,Len(CPN) - 3), Versionless as range, 2, 0)
  10. GoTo FinalOwner
  11. Line2:
  12. Err.Clear
  13. On Error GoTo Line3
  14. Owner = WorksheetFunction.Vlookup(Left(CPN,Len(CPN) - 1), WholePN, 3, 0)
  15. GoTo FinalOwner
  16. Line3:
  17. Err.Clear
  18. Owner = “NA”
  19. FinalOwner:
  20. End Function

测试发现第5行和第11行的结果是可以出来,但是后面两种情况怎么都是"#VALUE!"

按道理不管CPN是个啥,结果最差也是"NA"才对呀,为啥出来"#VALUE!"?求大神指教。谢谢!

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值