'Declaration
Public Sub SetCellAggregationType( _
ByVal As Integer, _
ByVal As Integer, _
ByVal As AggregationType _
)
'使用法
Dim instance As AggregationDataModel
Dim row As Integer
Dim col As Integer
Dim aggType As AggregationType
instance.SetCellAggregationType(row, col, aggType)