Spread Windows Forms 8.0 Product Documentation
Move Method (IRangeSupport)
Example 


Row index from which to begin the move
Column index from which to begin the move
Row index at which to paste the cell range
Column index at which to paste the cell range
Number of rows to move
Number of columns to move
Moves a range of cells and pastes it into a range of cells at the specified location.
Syntax
'Declaration
 
Sub Move( _
   ByVal fromRow As Integer, _
   ByVal fromColumn As Integer, _
   ByVal toRow As Integer, _
   ByVal toColumn As Integer, _
   ByVal rowCount As Integer, _
   ByVal columnCount As Integer _
) 
'Usage
 
Dim instance As IRangeSupport
Dim fromRow As Integer
Dim fromColumn As Integer
Dim toRow As Integer
Dim toColumn As Integer
Dim rowCount As Integer
Dim columnCount As Integer
 
instance.Move(fromRow, fromColumn, toRow, toColumn, rowCount, columnCount)
void Move( 
   int fromRow,
   int fromColumn,
   int toRow,
   int toColumn,
   int rowCount,
   int columnCount
)

Parameters

fromRow
Row index from which to begin the move
fromColumn
Column index from which to begin the move
toRow
Row index at which to paste the cell range
toColumn
Column index at which to paste the cell range
rowCount
Number of rows to move
columnCount
Number of columns to move
Example
This example moves the data from the specified range to the specified location.
FarPoint.Win.Spread.Model.IRangeSupport irs;
DialogResult dlg;
Random r = new Random();
int i, j;
for (i = 0; i<=2; i++)
{
for (j = 0; j<=2; j++)
fpSpread1.ActiveSheet.SetValue(i, j, r.Next(1, 200).ToString());
}
irs = (FarPoint.Win.Spread.Model.IRangeSupport)fpSpread1.ActiveSheet.Models.Data;
dlg = MessageBox.Show("Do you want to move some data?", "Move", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
irs.Move(0, 0, 4, 0, 2, 2);
}
Dim irs As FarPoint.Win.Spread.Model.IRangeSupport
Dim dlg As DialogResult
Dim r As New Random()
Dim i, j As Integer
For i = 0 To 2
For j = 0 To 2
FpSpread1.ActiveSheet.SetValue(i, j, r.Next(1, 200).ToString())
Next j
Next i
irs = FpSpread1.ActiveSheet.Models.Data
dlg = MessageBox.Show("Do you want to move some data?", "Move", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
irs.Move(0, 0, 4, 0, 2, 2)
End If
Requirements

Target Platforms: Windows 2000 Professional (SP4), Windows 2000 Server, Windows 2003 Server (SP1), Windows 2008, Windows XP (SP2), Windows Vista, Windows 7, Windows 8

See Also

Reference

IRangeSupport Interface
IRangeSupport Members

 

 


Copyright © GrapeCity, inc. All rights reserved.