Dim workbook As New Infragistics.Documents.Excel.Workbook()
Dim worksheet As Infragistics.Documents.Excel.Worksheet = _
workbook.Worksheets.Add("Sheet1")
' 列ヘッダをいくつか作成します。
worksheet.Rows.Item(1).Cells.Item(1).Value = "Morning"
worksheet.Rows.Item(1).Cells.Item(2).Value = "Afternoon"
worksheet.Rows.Item(1).Cells.Item(3).Value = "Evening"
' ヘッダが列ヘッダとなるマージされた領域を作成します。
Dim mergedRegion1 As Infragistics.Documents.Excel.WorksheetMergedCellsRegion = _
worksheet.MergedCellsRegions.Add(0, 1, 0, 3)
' マージされた領域の値を設定します。
mergedRegion1.Value = "Day 1"
' マージされた領域に単色の背景色を指定します。
mergedRegion1.CellFormat.FillPattern = _
Infragistics.Documents.Excel.FillPatternStyle.Solid
mergedRegion1.CellFormat.FillPatternForegroundColor = Color.SkyBlue
' マージされた領域の中央のセルの配置を設定します。
' セルとセルのマージされた領域がセル フォーマットを共有したために、これはマージされた
' 領域のフォーマットを最終的に設定することになります。
worksheet.Rows.Item(0).Cells.Item(2).CellFormat.Alignment = _
Infragistics.Documents.Excel.HorizontalCellAlignment.Center