// 新規ワークブックの作成 var workbook = new GrapeCity.Documents.Excel.Workbook(); IWorksheet ws = workbook.Worksheets["Sheet1"]; ws.Range["A:A"].ColumnWidthInPixel = 30d; ws.Range["B:B"].ColumnWidthInPixel = 106d; // 3つのチェック状態 ws.Range["B2"].Value = "チェックボックスには、3つのチェック状態があります。"; var checkBox1 = ws.Controls.AddCheckBox(23.1, 54.7, 80, 20); checkBox1.Display3DShading = true; checkBox1.IsChecked = false; checkBox1.Text = "オフ"; var checkBox2 = ws.Controls.AddCheckBox(23.1, 91.5, 80, 20); checkBox2.IsChecked = true; checkBox2.Text = "オン"; var checkBox3 = ws.Controls.AddCheckBox(23.1, 129.5, 80, 20); checkBox3.IsChecked = null; checkBox3.Text = "複合"; // 値を連結 ws.Range["B11"].Value = "リンクするセルを設定して値を連結できます。"; var checkBox4 = ws.Controls.AddCheckBox(22.5, 225, 80, 20); checkBox4.LinkedCell = ws.Range["D13"]; checkBox4.IsChecked = true; // xlsx ファイルに保存 workbook.Save("CheckBoxesBasicUsage.xlsx");
' 新規ワークブックの作成 Dim workbook As New Workbook Dim ws As IWorksheet = workbook.Worksheets("Sheet1") ws.Range("A:A").ColumnWidthInPixel = 30.0R ws.Range("B:B").ColumnWidthInPixel = 106.0R ' 3つのチェック状態 ws.Range!B2.Value = "チェックボックスには、3つのチェック状態があります。" With ws.Controls.AddCheckBox(23.1, 54.7, 80, 20) .IsChecked = False .Text = "オフ" End With With ws.Controls.AddCheckBox(23.1, 91.5, 80, 20) .IsChecked = True .Text = "オン" End With With ws.Controls.AddCheckBox(23.1, 129.5, 80, 20) .IsChecked = Nothing .Text = "複合" End With ' 値を連結 ws.Range!B11.Value = "リンクするセルを設定して値を連結できます。" With ws.Controls.AddCheckBox(22.5, 225, 80, 20) .LinkedCell = ws.Range!D13 .IsChecked = True End With ' xlsx ファイルに保存 workbook.Save("CheckBoxesBasicUsage.xlsx")