Question

我们在excel表上有OLE图片对象。有一些后端处理（C ++ / C＃）返回结果和一个布尔值。基于布尔值，我们引发异常。问题是，如果我们提出任何异常，我们的对象处理就会折腾。而且我们无法删除图片对象。我究竟做错了什么？这是我的代码或VBA限制的一些问题。删除不是通过任何代码，而是简单选择（实时）图片对象和excel删除。

   Dim var1 As Variant
   Dim returnVar As Variant
   On Error GoTo CallingTheBackendFn_Error
   returnVar = CallingTheBackendFn(cellText, outputToCell, var1)

   If Not returnVar And (var1 <> "") Then
       On Error GoTo 0
       Err.Raise vbError, "TheFunction", var1
   End If
   Exit Sub

  CallingTheBackendFn_Error:
       Dim errorNum As Long
       Dim errorDescp As String
       errorNum = Err.Number
       errorDescp = Err.Description
       Err.Clear
       On Error GoTo 0
       Err.Raise errorNum, "", errorDescp
   End Sub

VBA异常会混淆OLE图片对象的行为

0 个答案: