// 新規ワークブックの作成 var workbook = new GrapeCity.Documents.Excel.Workbook(); IWorksheet worksheet = workbook.Worksheets[0]; worksheet.Range["C2:E4"].Value = new object[,] { {"aa", "bb", "aa1"}, {"ccc", "dddd", "dddd1"}, {"ff", "ffff", "ffff1"} }; // 文字列（長さ指定）入力規則の作成 worksheet.Range["C2:E4"].Validation.Add(ValidationType.TextLength, ValidationAlertStyle.Stop, ValidationOperator.Between, 2, 3); // 範囲["C2:E4"]に入力規則が設定されているかの判断 for (int i = 1; i <= 3; i++) { for (int j = 2; j <= 4; j++) { if (worksheet.Range[i, j].HasValidation) { // 入力規則が設定されている場合に内部の色を変更 worksheet.Range[i, j].Interior.Color = Color.LightBlue; } } } // xlsx ファイルに保存 workbook.Save("CreateTextLength.xlsx");
' 新規ワークブックの作成 Dim workbook As New Workbook Dim worksheet As IWorksheet = workbook.Worksheets(0) worksheet.Range("C2:E4").Value = New Object(,) { {"aa", "bb", "aa1"}, {"ccc", "dddd", "dddd1"}, {"ff", "ffff", "ffff1"} } ' 文字列（長さ指定）入力規則の作成 worksheet.Range("C2:E4").Validation.Add(ValidationType.TextLength, ValidationAlertStyle.Stop, ValidationOperator.Between, 2, 3) ' 範囲["C2:E4"]に入力規則が設定されているかの判断 For i As Integer = 1 To 3 For j As Integer = 2 To 4 If worksheet.Range(i, j).HasValidation Then ' 入力規則が設定されている場合に内部の色を変更 worksheet.Range(i, j).Interior.Color = Color.LightBlue End If Next j Next i ' xlsx ファイルに保存 workbook.Save("CreateTextLength.xlsx")