Excel .Find 在找不到特定变量时抛出异常。如何阻止它中断执行 VB.net
Excel .Find throws an exception when it doesnt find a specific variable. How Do I stop it from breaking execution VB.net
好morning/afternoon全部,
我目前正在创建一个程序来自动化几个 excel 工作表。
虽然这对某些人来说可能微不足道。我不知道如何停止 .find 在找不到它正在寻找的结果时抛出异常。
如果 .find 函数可以找到它之后的内容,它就会按预期工作。
AreaFindRow = ExportExcelWs.Range(AreaFind).Find(AreaArray).Row
system.nullreferenceexception
错误信息:'Object reference not set to an instance of an object.'
我试过:
Try
AreaFindRow = ExportExcelWs.Range(AreaFind).Find(AreaArray).Row
Catch ex As Exception
MsgBox("Cannot find this value in the worksheet")
End Try
然而,这仍然不起作用。
任何建议都会被测试!
提前致谢。
试试这个
If Not ExportExcelWs.Range(AreaFind).Find(AreaArray) Is Nothing Then
AreaFindRow = ExportExcelWs.Range(AreaFind).Find(AreaArray).Row
Else
AreaFindRow = 0
End if
然后您可以根据 AreaFindRow 是 0 还是 >0
来处理您的代码
好morning/afternoon全部,
我目前正在创建一个程序来自动化几个 excel 工作表。
虽然这对某些人来说可能微不足道。我不知道如何停止 .find 在找不到它正在寻找的结果时抛出异常。
如果 .find 函数可以找到它之后的内容,它就会按预期工作。
AreaFindRow = ExportExcelWs.Range(AreaFind).Find(AreaArray).Row
system.nullreferenceexception
错误信息:'Object reference not set to an instance of an object.'
我试过:
Try
AreaFindRow = ExportExcelWs.Range(AreaFind).Find(AreaArray).Row
Catch ex As Exception
MsgBox("Cannot find this value in the worksheet")
End Try
然而,这仍然不起作用。
任何建议都会被测试!
提前致谢。
试试这个
If Not ExportExcelWs.Range(AreaFind).Find(AreaArray) Is Nothing Then
AreaFindRow = ExportExcelWs.Range(AreaFind).Find(AreaArray).Row
Else
AreaFindRow = 0
End if
然后您可以根据 AreaFindRow 是 0 还是 >0
来处理您的代码