作成日: 2022/02/07 最終更新日: 2022/02/07
文書種別
使用方法
詳細
新しいスタイル(LegacyBehaviors≠Style)では、IWorksheet インタフェースのCopy メソッドを使用して既存シートをコピーすることが可能です。
◎サンプルコード(VB)
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.Text = " LegacyBehaviors = " & (FpSpread1.LegacyBehaviors).ToString
Dim bc As New FarPoint.Win.Spread.CellType.ButtonCellType
bc.Text = "Click!"
FpSpread1.ActiveSheet.Cells(1, 0).CellType = bc
FpSpread1.Sheets(0).Cells(1, 1).Value = "test"
FpSpread1.Sheets(0).Cells(1, 1).BackColor = Color.LavenderBlush
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
'シートコピー
FpSpread1.AsWorkbook().ActiveSheet.Copy(1)
'シート名変更
FpSpread1.Sheets(1).SheetName = "NewSheet"
End Sub
◎サンプルコード(C#)
private void Form1_Load(object sender, EventArgs e)
{
FarPoint.Win.Spread.CellType.ButtonCellType bc = new FarPoint.Win.Spread.CellType.ButtonCellType();
bc.Text = "Click!";
fpSpread1.ActiveSheet.Cells[1, 0].CellType = bc;
fpSpread1.ActiveSheet.Cells[1, 1].Value = "test";
fpSpread1.ActiveSheet.Cells[1, 1].BackColor = Color.LavenderBlush;
}
private void button1_Click(object sender, EventArgs e)
{
//シートコピー
fpSpread1.AsWorkbook().ActiveSheet.Copy(1);
//シート名変更
fpSpread1.Sheets[1].SheetName = "NewSheet";
}
<実行イメージ>