× [PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。 |
![]() |
VisualStudioなどの開発環境では、セルを結合できるコンポーネントがなくなってきています。
データグリッドでセルが結合できないのは意外と不便に感じるものです、 そんな時にはDataGridViewForMergeコンポーネントを是非ご活用されてみてはいかがでしょうか。 セル結合コンポDataGridViewForMergeダウンロードできます。 Grid(グリッド)でセルを結合したい時などに便利なコンポーネントです。 DataGridやDataGridViewで実現可能 ![]() 複数セルの結合も可能です。 ![]() 利用してみたいという方は、 Vector(ベクター)からダウンロードできます。 【サンプルソースはこちら】 '初期化 Me.DataGridViewForMerge1.MergeCellDataList.Clear() '================================== '詳細設定サンプル '================================== '---------------------------------- 'Rowヘッダー作成 '---------------------------------- For rowIndex As Integer = 0 To 5 Me.DataGridViewForMerge1.Rows(rowIndex).Cells(0).Value = "予定" & rowIndex.ToString("000") Me.DataGridViewForMerge1.Rows(rowIndex).Cells(0).Style.BackColor = Color.Gray Next '----------------------------------- 'Colヘッダー作成 '----------------------------------- For colIndex As Integer = 1 To 31 Me.DataGridViewForMerge1.Columns(colIndex).HeaderText = colIndex.ToString("000") Me.DataGridViewForMerge1.Columns(colIndex).Width = 50 Next '----------------------------------- '結合処理 '----------------------------------- '結合クラス作成 Dim mergeCellClass As MergeCellData mergeCellClass = New MergeCellData '開始行 mergeCellClass.StartRow = 0 '開始列 mergeCellClass.StartCol = 1 '終了行 mergeCellClass.EndRow = 0 '終了列 mergeCellClass.EndCol = 3 '色指定 mergeCellClass.BackColor = Color.Red '登録 Me.DataGridViewForMerge1.MergeCellDataList.Add(mergeCellClass) '------------------------------------ mergeCellClass = New MergeCellData '開始行 mergeCellClass.StartRow = 1 '開始列 mergeCellClass.StartCol = 2 '終了行 mergeCellClass.EndRow = 1 '終了列 mergeCellClass.EndCol = 4 '色指定 mergeCellClass.BackColor = Color.Blue '登録 Me.DataGridViewForMerge1.MergeCellDataList.Add(mergeCellClass) '------------------------------------ mergeCellClass = New MergeCellData '開始行 mergeCellClass.StartRow = 2 '開始列 mergeCellClass.StartCol = 4 '終了行 mergeCellClass.EndRow = 2 '終了列 mergeCellClass.EndCol = 6 '色指定 mergeCellClass.BackColor = Color.Green '登録 Me.DataGridViewForMerge1.MergeCellDataList.Add(mergeCellClass) '------------------------------------ mergeCellClass = New MergeCellData '開始行 mergeCellClass.StartRow = 3 '開始列 mergeCellClass.StartCol = 1 '終了行 mergeCellClass.EndRow = 3 '終了列 mergeCellClass.EndCol = 4 '色指定 mergeCellClass.BackColor = Color.Yellow '登録 Me.DataGridViewForMerge1.MergeCellDataList.Add(mergeCellClass) '------------------------------------ mergeCellClass = New MergeCellData '開始行 mergeCellClass.StartRow = 4 '開始列 mergeCellClass.StartCol = 1 '終了行 mergeCellClass.EndRow = 4 '終了列 mergeCellClass.EndCol = 9 '色指定 mergeCellClass.BackColor = Color.Blue '登録 Me.DataGridViewForMerge1.MergeCellDataList.Add(mergeCellClass) '描画する Me.DataGridViewForMerge1.Refresh() PR |
![]() |
![]() |
|
![]() |
トラックバックURL
|
![]() |