'Declaration
 
Public Function New( _
   ByVal  As SheetView, _
   ByVal  As Integer, _
   ByVal column As Integer, _
   ByVal  As Integer, _
   ByVal columnCount As Integer, _
   ByVal  As Integer, _
   ByVal  As FillDirection, _
   ByVal  As Boolean _
)
             
        
            
            '使用法
 
Dim sheetView As SheetView
Dim row As Integer
Dim column As Integer
Dim rowCount As Integer
Dim columnCount As Integer
Dim fillCount As Integer
Dim fillDirection As FillDirection
Dim dataOnly As Boolean
 
Dim instance As New CellDragFillUndoAction(sheetView, row, column, rowCount, columnCount, fillCount, fillDirection, dataOnly)