Imports Microsoft.Office.Interop Dim xlApp As Excel.Application Dim xlBooks As Excel.Workbooks Dim xlBook As Excel.Workbook Try xlApp = New Excel.Application xlBooks = xlApp.Workbooks xlBook = xlBooks.Open(FileName) bExcelOpen = True Catch ex As Exception bExcelOpen = False Finally etc....
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)