DataGridViewのように、最終行のセルに文字を入力したとき新規行を追加したい – MESCIUS ナレッジベース

作成日: 2018/06/14 最終更新日: 2018/06/14

文書種別

使用方法

詳細

SheetViewクラスのDataAllowAddNewプロパティをTrueにすることで、ユーザーによるシート末尾への新規行の追加を許可することができます。

メモ

DataAllowAddNewプロパティはデータ連結されている場合のみ有効になります。
便宜上、当サンプルではデータセットを手動で作成しています。（DataSetの他にもDataTableやDataViewとの連結が可能です）　SQL ServerやOracle等との接続に関する一般的な手法については各種参考文献をご参照ください。

◎サンプルコード(VB)

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
　　' データセットを作成しします
　　Dim DT As New DataTable
　　Dim DS As New DataSet
　　DT = DS.Tables.Add("SampleTable")
　　DT.Columns.AddRange(New DataColumn() { _
　　　New DataColumn("ID", Type.GetType("System.Int32")), _
　　　New DataColumn("Text", Type.GetType("System.String")), _
　　　New DataColumn("Check", Type.GetType("System.Boolean")) _
　　})

　　DT.Rows.Add(New Object() {10, "Text-10", True})
　　DT.Rows.Add(New Object() {20, "Text-20", False})
　　DT.Rows.Add(New Object() {30, "Text-30", False})
　　DT.Rows.Add(New Object() {40, "Text-40", True})
　　DT.Rows.Add(New Object() {50, "Text-50", True})

　　' データセットを接続します
　　FpSpread1.DataSource = DS

　　' 新規行の追加を許可します
　　FpSpread1.ActiveSheet.DataAllowAddNew = True

End Sub

◎サンプルコード(C#)

private void Form1_Load(object sender, EventArgs e)
{
　　// データセットを作成します
　　DataTable DT = new DataTable();
　　DataSet DS = new DataSet();
　　DT = DS.Tables.Add("SampleTable");
　　DT.Columns.AddRange(new DataColumn[] {
　　　new DataColumn("ID", Type.GetType("System.Int32")),
　　　new DataColumn("Text", Type.GetType("System.String")),
　　　new DataColumn("Check", Type.GetType("System.Boolean"))
　　});

　　DT.Rows.Add(new object[] { 10, "Text-10", true });
　　DT.Rows.Add(new object[] { 20, "Text-20", false });
　　DT.Rows.Add(new object[] { 30, "Text-30", false });
　　DT.Rows.Add(new object[] { 40, "Text-40", true });
　　DT.Rows.Add(new object[] { 50, "text-50", true });

　　// データセットを接続します
　　fpSpread1.DataSource = DS;

　　// 新規行の追加を許可します
　　fpSpread1.ActiveSheet.DataAllowAddNew = true;
}

旧文書番号

82867