使用Range.AddComment时，为什么会出现HRESULT 0x800A03EC异常

Question

我似乎无法在Range.AddComment

的上下文中找到有关此错误的问题

我正在使用遍历所选行的代码并为每个单元格添加注释。有时，它会在已包含注释的单元格中写入注释。我不确定我是否收到此错误，因为我在已包含注释的单元格上使用.AddComment，或者是因为其他原因与我的范围有关。

 If IsDBNull(pobjComment) Then
                mwksSheet.Range(strExcelCol(pintCol) & (pintRow + 1)).AddComment(Nothing)
 Else
                mwksSheet.Range(strExcelCol(pintCol) & (pintRow + 1)).AddComment(pobjComment)
 End If

pobjComment是一个通用对象;在我使用它的情况下，我从DataColumn的扩展属性传递一个字符串值。

当pobjComment实际上是某种东西时会发生错误。如果问题是在其他评论上添加评论..那么我想知道我是否应该首先尝试删除任何现有评论，或者在我尝试添加之前检查值是否相同......