0

我刚从 Visual Studio 中的 Excel Add-in express 开始,并读到类似的表达式 mySheet.Columns.count是一个很大的“禁止”,因为它创建了一个Columns不与任何变量绑定的中间对象,以后无法发布。

考虑到这一点,我编写了以下代码,仔细确保我没有链接任何对象。这似乎是一种非常耗时的编码方式,因此想在进一步进行之前检查我的方法。有没有更好的办法?

'find ends
    Dim leftCol As Integer
    Dim tmpCell, tmpCell2 As Excel.Range
    tmpCell = Sh.Cells(1, 1) 'COM
    If (tmpCell.Value <> "") Then
        leftCol = 1
        Marshal.ReleaseComObject(tmpCell)
    Else
        tmpCell2 = tmpCell.End(XlDirection.xlToRight)
        leftCol = tmpCell2.Column
        Marshal.ReleaseComObject(tmpCell2)
        Marshal.ReleaseComObject(tmpCell)
    End If
    Marshal.ReleaseComObject(Sh)
4

0 回答 0