Dim instance As ExcelSheet = New ExcelSheet()

Dim filePathName As String

Dim instance As ExcelSheet = New ExcelSheet(filePathName)	'雛型としてExcelブックを読み込みます。

'ExcelSheetクラス ExcelSheetコンストラクタ

Public Class AddIn

    Private es As ExcelSheet

    Public Sub New()
        es = New ExcelSheet()
    End Sub

End Class

'ExcelSheetクラス ExcelSheetコンストラクタ

Public Class AddIn

    Private es As ExcelSheet

    Public Sub New()
        es = New ExcelSheet("D:\tmp\sample.xlsx")
    End Sub

End Class