SPREAD デザイナでは、データテーブルの追加、セルの書式設定、関数の挿入、予測シートの作成、重複の削除、塗りつぶし効果の追加などを行うことができる多数の組み込みダイアログを提供しています。

実行時に組み込みダイアログを呼び出すには、BuiltInDialogs クラスを使用します。

• ［データテーブル］ダイアログ
• ［塗りつぶし効果］ダイアログ
• ［予測シートの作成］ダイアログ
• ［セルの書式設定］ダイアログ
• ［ゴールシーク］ダイアログ
• ［色］ダイアログ
• ［名前の管理］ダイアログ
• ［新しい名前］ダイアログ
• ［重複の削除］ダイアログ
• ［区切り位置指定ウィザード］ダイアログ
• ［関数の挿入］ダイアログ

［データテーブル］ダイアログ

［データ テーブル］ダイアログを使用すると、実行時に必要に応じて行または列の代入セルを指定して、Spread ワークシートにデータテーブルを作成することができます。実行時に［データテーブル］ダイアログを呼び出すには、BuiltInDialogs クラスのDataTable メソッドを使用します。

次のサンプルコードでは、実行時に［DataTable］ メソッドを使用して、データ テーブル ダイアログを呼び出す方法を示します。

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.DataTable(fpSpread1).Show(fpSpread1);

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.DataTable(FpSpread1).Show(FpSpread1)

データテーブルの詳細については、 データテーブルの使用を参照してください。

［塗りつぶし効果］ダイアログ

［塗りつぶし効果］ダイアログを使用すると、図形に色のグラデーションや塗りつぶしパターンなどを追加することができます。このダイアログには、色、バリエーション、グラデーションの種類、塗りつぶしパターン、および指定したグラデーション効果をプレビュー表示できるオプションが用意されています。BuiltInDialogs クラスの FillEffects メソッドを使用して、ダイアログを呼び出すことができます。

次のサンプルコードは、実行時に ［塗りつぶし効果］ダイアログ ボックスを呼び出す方法を示します。

fpSpread1.Features.EnhancedShapeEngine = true;
IShape shape1 = TestActiveSheet.Shapes.AddShape(AutoShapeType.Rectangle, 50, 100, 100, 200);
FarPoint.Win.Spread.Dialogs.BuiltInDialogs.FillEffects(fpSpread1.AsWorkbook(), ((Shape)shape1).Brush).ShowDialog();

FpSpread1.Features.EnhancedShapeEngine = True
Dim shape1 As IShape = TestActiveSheet.Shapes.AddShape(AutoShapeType.Rectangle, 50, 100, 100, 200)
FarPoint.Win.Spread.Dialogs.BuiltInDialogs.FillEffects(FpSpread1.AsWorkbook(), CType(shape1, Shape).Brush).ShowDialog()

図形の塗りつぶし効果の詳細については、セルコメント を参照してください。

［予測ワークシートの作成］ダイアログ

BuiltInDialogs クラスの ForecastSheet メソッドを使用して［予測シート］ダイアログを作成できます。このダイアログを使用すると、データの傾向を予測する新しいワークシートを作成できます。

次のサンプル コードは、実行時に ［予測シート］ ダイアログ ボックスを呼び出す方法を示します。   

fpSpread1.ActiveSheet.SetClip(0, 0, 3, 1, "1\n3\n5");
fpSpread1.ActiveSheet.SetClip(0, 1, 3, 1, "2\n4\n6");
TestActiveSheet.Cells["A1:B3"].Select();
FarPoint.Win.Spread.Dialogs.BuiltInDialogs.ForecastSheet(fpSpread1).Show(fpSpread1);

FpSpread1.ActiveSheet.SetClip(0, 0, 3, 1, "1" & vbCrLf & "3" & vbCrLf & "5")
FpSpread1.ActiveSheet.SetClip(0, 1, 3, 1, "2" & vbCrLf & "4" & vbCrLf & "6")
TestActiveSheet.Cells("A1:B3").Select()
FarPoint.Win.Spread.Dialogs.BuiltInDialogs.ForecastSheet(FpSpread1).Show(FpSpread1)

予測機能の詳細については、［予測シート］ダイアログ を参照してください。

［セルの書式設定］ダイアログ

［セルの書式設定 ］ダイアログでは、指定範囲のスタイル設定をカスタマイズすることができます。実行時にこのダイアログを呼び出すには、BuiltInDialogsクラスのFormatCellsメソッドを使用します。FormatCells メソッドには、FormatCells(GrapeCity.Spreadsheet.IRange セル、 [FarPoint.Win.Spread.FormatCells.FormatCellsTab activeTab = 0]) およびFormatCells(FarPoint.Win.Spread.CellType.IRichTextEditor richTextEditor)の 2 つのオーバーロードがあります。

次のサンプル コードでは、［セルの書式設定］ ダイアログ ボックスを呼び出して、セル範囲のスタイル設定を操作する方法を示します。

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.FormatCells(TestActiveSheet.Cells["A1:B1"]).ShowDialog();

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.FormatCells(TestActiveSheet.Cells("A1:B1")).ShowDialog()

セルの書式設定の詳細については、フォーマッタとエディタ を参照してください。

FormatCells(FarPoint.Win.Spread.CellType.IRichTextEditor richTextEditor)メソッドを使用すると、実行時にセル内のリッチ テキストを書式設定、および編集できます。

次のサンプルコードは、リッチ テキストを編集するために［セルの書式設定］ダイアログ ボックスを呼び出す方法を示します。

fpSpread1.Features.RichTextEdit = RichTextEditMode.On;
TestActiveSheet.Cells["A1"].Value = "abc";
private void fpSpread1_EditModeOn(object sender, EventArgs e)
     {
       if (fpSpread1.EditingControl is IRichTextEditor richTextEditor)
       {
         FarPoint.Win.Spread.Dialogs.BuiltInDialogs.FormatCells(richTextEditor);
       }
     }

fpSpread1.Features.RichTextEdit = RichTextEditMode.On
TestActiveSheet.Cells("A1").Value = "abc"
Private Sub fpSpread1_EditModeOn(sender As Object, e As EventArgs)
    If TypeOf fpSpread1.EditingControl Is IRichTextEditor Then
        Dim richTextEditor As IRichTextEditor = CType(fpSpread1.EditingControl, IRichTextEditor)
        FarPoint.Win.Spread.Dialogs.BuiltInDialogs.FormatCells(richTextEditor).ShowDialog()
    End If
End Sub

リッチテキストの編集の詳細については、リッチテキスト形式の編集を参照してください。

［ゴールシーク］ダイアログ

［ゴールシーク］ダイアログでは、Spread ワークシートで特定の目標を達成するために目的な値を計算できます。これを行うには、BuiltInDialogs クラスの NewName メソッドを使用します。

次のサンプル コードでは、実行時にゴールシークダイアログを呼び出す方法を示します。

TestActiveSheet.Cells["B1"].Formula = "A1";
TestActiveSheet.Cells["B2"].Formula = "A2";
FarPoint.Win.Spread.Dialogs.BuiltInDialogs.GoalSeek(fpSpread1).Show(fpSpread1);

TestActiveSheet.Cells("B1").Formula = "A1"
TestActiveSheet.Cells("B2").Formula = "A2"
FarPoint.Win.Spread.Dialogs.BuiltInDialogs.GoalSeek(fpSpread1).Show(fpSpread1)

ゴールシーク機能の詳細については、［ゴールシーク］ダイアログを参照してください。

［色の設定］ダイアログ

［色の設定］ダイアログでは、SPREAD でカスタマイズされた色を選択することができます。これにより、実行時に標準色とカスタム色を選択できます。これを　行うには、BuiltInDialogsクラスの MoreColors メソッドを使用します。

次のサンプル コードは、実行時にMoreColorsメソッドを使用して、実行時に ［色］ ダイアログ ボックスを呼び出す方法を示します。

IWorkbook activeWorkbook = fpSpread1.AsWorkbook();
IRange range = activeWorkbook.ActiveSheet.ActiveCell;
FarPoint.Win.Spread.Dialogs.MoreColors colorDlg = FarPoint.Win.Spread.Dialogs.BuiltInDialogs.MoreColors(range.Font.Color, activeWorkbook);
if (colorDlg.ShowDialog() == DialogResult.OK)
{
    range.Interior.Color = colorDlg.Color;
}
else
{
    colorDlg.Dispose();
    return;
}

Dim activeWorkbook As IWorkbook = FpSpread1.AsWorkbook()
Dim range As IRange = activeWorkbook.ActiveSheet.ActiveCell
Dim colorDlg As FarPoint.Win.Spread.Dialogs.MoreColors = FarPoint.Win.Spread.Dialogs.BuiltInDialogs.MoreColors(range.Font.Color, activeWorkbook)
If colorDlg.ShowDialog() = DialogResult.OK Then
    range.Interior.Color = colorDlg.Color
Else
    colorDlg.Dispose()
    Return
End If

［名前の管理］ダイアログ

［名前の管理］ダイアログを使用すると、SPREAD デザイナでカスタム名を作成、編集、または削除できます。実行時に［名前の管理］ダイアログを呼び出すには、BuiltInDialogs クラスの NameManager メソッドを使用します。

次のサンプル コードは、実行時に［名前の管理］ ダイアログ ボックスを呼び出す方法を示します。

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.NameManager(fpSpread1).Show(fpSpread1);

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.NameManager(FpSpread1).Show(FpSpread1)

［名前の管理］機能の詳細については、［名前の管理］ダイアログ を参照してください。

［新しい名前］ダイアログ

［新しい名前］ダイアログ使用すると、Spread で新しい定義名を作成することができます。セル範囲の名前を作成し、ワークブック内または個々のワークシートのみで名前にアクセスできるようにするかどうかを選択します。また、必要に応じてコメントも追加できます。実行時にこのダイアログを呼び出すには、BuiltInDialogsクラスのNewNameメソッドを使用します。

次のサンプル コードは、［新しい名前］ダイアログ ボックスを呼び出す方法を示します。

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.NewName(fpSpread1).Show(fpSpread1);

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.NewName(FpSpread1).Show(FpSpread1)

［重複の削除］ダイアログ

［重複の削除］ ダイアログでは、値の範囲から重複する値を削除することができます。SPREAD では、実行時にこのダイアログを呼び出すことができます。重複する値を削除するには、BuiltInDialog クラスの RemoveDuplicates メソッドを使用します。

次のサンプル コードは、実行時に ［重複の削除］ダイアログを呼び出す方法を示します。

fpSpread1.ActiveSheet.SetClip(0, 1, 6, 1, "2\n1\n3\n2\n5\n3");
TestActiveSheet.Cells["B1:B8"].Select();
FarPoint.Win.Spread.Dialogs.BuiltInDialogs.RemoveDuplicates(fpSpread1)?.ShowDialog(fpSpread1);

FpSpread1.ActiveSheet.SetClip(0, 1, 6, 1, "2" & vbCrLf & "1" & vbCrLf & "3" & vbCrLf & "2" & vbCrLf & "5" & vbCrLf & "3")
TestActiveSheet.Cells("B1:B8").Select()
Dim removeDuplicatesDialog As FarPoint.Win.Spread.Dialogs.RemoveDuplicatesDialog = FarPoint.Win.Spread.Dialogs.BuiltInDialogs.RemoveDuplicates(FpSpread1)
If removeDuplicatesDialog IsNot Nothing Then
    removeDuplicatesDialog.ShowDialog(FpSpread1)
End If

Spread で重複する値の削除の詳細については、範囲から重複の削除を参照してください。

［区切り位置指定ウィザード］ダイアログ

［区切り位置指定ウィザード］ ダイアログでは、区切り記号を使用して、1 つのセルまたは列の文字列を複数の列に解析することができます。実行時にこのダイアログを呼び出すには、BuiltInDialogs クラスのTextToColumns メソッドを使用します。

次のサンプル コードは、実行時に ［区切り位置指定ウィザード］ダイアログを呼び出す方法を示します。

TestActiveSheet.Cells["A1"].Value = "Red,Blue,Green,Black,White,Yellow";
FarPoint.Win.Spread.Dialogs.BuiltInDialogs.TextToColumns(fpSpread1).Show(fpSpread1);

TestActiveSheet.Cells("A1").Value = "Red,Blue,Green,Black,White,Yellow"
FarPoint.Win.Spread.Dialogs.BuiltInDialogs.TextToColumns(FpSpread1).Show(FpSpread1)

本機能の詳細については、区切り位置の使用を参照してください。

［関数の挿入］ダイアログ

実行時に ［関数の挿入］ ダイアログを呼び出すには、BuiltInDialogs クラスの ToggleInsertFunction メソッドを使用します。［関数の挿入］ダイアログを使用すると、関数を検索して、セルに挿入できます。

次のサンプル コードは、［関数の挿入］ダイアログを呼び出す方法を示します。   

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.ToggleInsertFunction(fpSpread1);

FarPoint.Win.Spread.Dialogs.BuiltInDialogs.ToggleInsertFunction(FpSpread1)

［関数の挿入］の詳細については、［関数の挿入］ダイアログを参照してください。

© MESCIUS inc. All rights reserved.