Copy Method (IRangeSupport) | Spread Windows Forms 13.0 Product Documentation

Copy Method (IRangeSupport)

In This Topic

Copies a range of cells and pastes it into a range of cells at the specified location.

Syntax

Visual Basic
C#

'Declaration
 
Sub Copy( _
   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.Copy(fromRow, fromColumn, toRow, toColumn, rowCount, columnCount)

void Copy( 
   int fromRow,
   int fromColumn,
   int toRow,
   int toColumn,
   int rowCount,
   int columnCount
)

Parameters

fromRow: Row index from which to begin copying
fromColumn: Column index from which to begin copying
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 copy
columnCount: Number of columns to copy

Example

This example copies 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 copy some data?", "Copy", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
irs.Copy(0, 0, 4, 0, 2, 2);
}

Visual Basic

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 copy some data?", "Copy", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
irs.Copy(0, 0, 4, 0, 2, 2)
End If

Reference

IRangeSupport Interface
IRangeSupport Members

Product Support Forum | Print this page