读取受保护的内存错误

Question

运行我的代码时出现以下错误。哪个使用Excel DNA

  

System.AccessViolationException未处理   消息：尝试读取或写入受保护的内存。这通常表明其他内存已损坏。

第一次通过它工作正常，第二次它抛出  以上错误。

这是我的代码：

Public Shared Function RangeExists(ByVal sName As String) As ExcelReference 

        Dim rRng As ExcelReference 

        Try 
             'This is where the error occurs
             rRng = XlCall.Excel(XlCall.xlfEvaluate, sName)  
         Catch 
             Try 
                 rRng = XlCall.Excel(XlCall.xlfEvaluate, "!" & sName) 
             Catch 
                 rRng = Nothing 
             End Try 
         End Try 

        Return rRng 

    End Function

我实际上在UDF中有类似的代码，工作正常，从未遇到过问题。