Dim instance As ExcelSheet
Dim col1 As Integer	'1から始まる開始列番号
Dim row1 As Integer	'1から始まる開始行番号
Dim col2 As Integer	'1から始まる終了列番号
Dim row2 As Integer	'1から始まる終了行番号
Dim num As Integer

'Overloads
instance.RangeValue(col1, row1, col2, row2, num)

Dim instance As ExcelSheet
Dim col1 As Integer	'1から始まる開始列番号
Dim row1 As Integer	'1から始まる開始行番号
Dim col2 As Integer	'1から始まる終了列番号
Dim row2 As Integer	'1から始まる終了行番号
Dim str As String

'Overloads
instance.RangeValue(col1, row1, col2, row2, str)

Dim instance As ExcelSheet
Dim col1 As Integer	'1から始まる開始列番号
Dim row1 As Integer	'1から始まる開始行番号
Dim col2 As Integer	'1から始まる終了列番号
Dim row2 As Integer	'1から始まる終了行番号
Dim fnum As Single

'Overloads
instance.RangeValue(col1, row1, col2, row2, fnum)

'ExcelSheetクラス RangeValueメソッド

Public Class AddIn

    Private es As ExcelSheet

    Public Sub New()
        es = New ExcelSheet()
		es.SelectSheet(1)
		es.RangeValue(1, 1, 5, 5, 100)		'A1:E5
		es.Save("D:\tmp\sample2.xlsx")
		es.Dispose()
    End Sub

End Class