Dim excelApp As New Excel.Application
        Dim wb As Excel.Workbook
        Dim sheet As Excel.Worksheet
        Dim i, j As Integer
 
        Try
            wb = excelApp.Workbooks.Open(FilePath)
            sheet = wb.Worksheets(1)
 
....