Spread Windows Forms 12.0 Product Documentation
ClipboardPaste() Method
Example 


FarPoint.Win.Spread Assembly > FarPoint.Win.Spread Namespace > SheetView Class > ClipboardPaste Method : ClipboardPaste() Method
Pastes the contents from the Clipboard to the active sheet.
Syntax
'Declaration
 
Public Overloads Sub ClipboardPaste() 
'Usage
 
Dim instance As SheetView
 
instance.ClipboardPaste()
public void ClipboardPaste()
Example
This example pastes data from the clipboard.
Random r = new Random();
int i, j;
DialogResult dlg;
for (i = 0; i <= 3; i++)
{
    for (j = 0; j <= 3; j++)
    {
        fpSpread1.ActiveSheet.SetValue(i, j, r.Next() -100000);
    }
}
dlg = MessageBox.Show("Do you want to copy the data to the clipboard?", "ClipboardCopy", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
    fpSpread1.ActiveSheet.AddSelection(0, 0, 3, 3);
    fpSpread1.ActiveSheet.ClipboardCopy();
}
dlg = MessageBox.Show("Do you want to paste the data from the clipboard? If yes, let's clear the data first.", "Clear", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
    fpSpread1.ActiveSheet.Cells[0, 0, 5, 5].Text = "";
}
dlg = MessageBox.Show("Now we're ready to paste!!", "ClipboardPaste", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
    fpSpread1.ActiveSheet.ClipboardPaste();
}
Dim r As New Random()
Dim i, j as Integer
Dim dlg As DialogResult
For i = 0 To 3
    For j = 0 To 3
        FpSpread1.ActiveSheet.SetValue(i, j, r.Next - 100000.ToString())
    Next j
Next i
dlg = MessageBox.Show("Do you want to copy the data to the clipboard?", "ClipboardCopy", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
    FpSpread1.ActiveSheet.AddSelection(0, 0, 3, 3)
    FpSpread1.ActiveSheet.ClipboardCopy()
End If
dlg = MessageBox.Show("Do you want to paste the data from the clipboard? If yes, let's clear the data first.", "Clear", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
    FpSpread1.ActiveSheet.Cells(0, 0, 5, 5).Text = ""
End If
dlg = MessageBox.Show("Now we're ready to paste!!", "ClipboardPaste", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
    FpSpread1.ActiveSheet.ClipboardPaste()
End If
See Also

Reference

SheetView Class
SheetView Members
Overload List