--------------------------------------------------------- Dim File_Name As String = "C:\xxxx\Book1.xls" Dim rfs As FileStream = File.OpenRead(File_Name) Dim book As IWorkbook = New HSSFWorkbook(rfs) rfs.Close()
'番号指定でシートを取得する(最初のシート) Dim sheet As ISheet = book.GetSheetAt(0)