wheincome.blogg.se

I am targetting Excel 2007, and I am happy to go with your suggestion of early binding. XlWorkBooks = Nothing End If If Not xlApp Is Nothing Then Marshal.FinalReleaseComObject(xlWorkBooks) XlWorkBook = Nothing End If If Not xlWorkBooks Is Nothing Then XlCells = Nothing End If If Not xlWorkSheet Is Nothing Then Value = CType(xlCells(3, 3), Excel.Range).Value.ToString XlWorkSheet = CType(xlWorkBook.Sheets( "Sheet3"), Excel.Worksheet) XlWorkBook = xlWorkBooks.Open( "Bill.xlsm")

Dim Value As String = "" Dim xlApp As Excel.Application = Nothing Dim xlWorkBooks As Excel.Workbooks = Nothing Dim xlWorkBook As Excel.Workbook = Nothing Dim xlWorkSheet As Excel.Worksheet = Nothing Dim xlCells As Excel.Range = Nothing