How to make left column be a header in datagridview

Question

0.00/5 (No votes)

See more:

I'm trying to change the entire left column of a datagridview to a headercell. Right now I have a program that pulls data from an excel file using the oledataadapter and lets me modify the data in the datagridview and save it back to the excel file. However one of my worksheets has the headers on the left and the data on the column to the right. Here is my code so far.

' The following lines specify the exact cells I with to pull from the excel file and populates the first column of the datagridview

SQL

MyCommand11 = New OleDbDataAdapter("Select * from [myWorksheet$A15:B21]", MyConnection)
        


        ds11 = New System.Data.DataSet()

DataGridView8.DataSource = ds11.Tables(0).DefaultView

'I found this code on MSDN, it turns the first column into a header, which is what I want. 'However I'm having trouble filling these headers with my data.

VB

Private Sub DataGridView8_CellPainting(sender As Object, e As DataGridViewCellPaintingEventArgs) Handles DataGridView8.CellPainting
        Dim rowNumber As Integer = 1

        For Each row As DataGridViewRow In DataGridView8.Rows
            If row.IsNewRow Then Continue For
            row.HeaderCell.Value = "Row " & rowNumber
            rowNumber = rowNumber + 1
        Next
        DataGridView8.AutoResizeRowHeadersWidth( _
            DataGridViewRowHeadersWidthSizeMode.AutoSizeToAllHeaders)
    End Sub

Posted 12-Jun-13 8:57am

CAS1224

Add a Solution

Comments

Maciej Los 12-Jun-13 16:15pm

WinForms? WebControls?
It makes the difference!

2 solutions

Solution 1

Please, refer these:
WebControls
===========
GridView.RowHeaderColumn Property (WebControls)[^]

WinForms
========
You need to set RowHeadersVilsible = True to set first column as row-headers ;)
DataGridView.RowHeadersVisible Property (WinForms)[^]
DataGridViewRow.HeaderCell Property (WinForms)[^]

Posted 12-Jun-13 10:42am

Maciej Los

Comments

CAS1224 12-Jun-13 18:18pm

Yes this makes the headers visible but I'm looking to make the data in the first column the header. All this does is create another column to the left of my first column.

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

TnTinMn · Accepted Answer · 2013-06-12T14:48:00

Here is a way to fake the DataGridView into doing what I think you want to do. Start with a new WinForm project and add a dgv to the form. Then add this to the Form1.vb code.

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
   ' make some data to show
   Dim dt As New DataTable()
   With dt
      .Columns.Add("Header", GetType(String))
      .Columns.Add("C1", GetType(Int32))
      .Columns.Add("C2", GetType(Int32))
      .Rows.Add(New Object() {"A", 2, 3})
      .Rows.Add(New Object() {"B", 4, 5})
      .Rows.Add(New Object() {"C", 6, 7})
   End With

   ' Setup the DGV to use the "Header" column as the row header
   With DataGridView1
      .DataSource = dt
      .AllowUserToAddRows = False
      .RowHeadersVisible = True
      .Columns("Header").Visible = False ' hide the header column
      .RowHeadersWidthSizeMode = DataGridViewRowHeadersWidthSizeMode.AutoSizeToAllHeaders
   End With
End Sub

Private Sub DataGridView1_RowPrePaint(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewRowPrePaintEventArgs) Handles DataGridView1.RowPrePaint
   ' sorting clears the headertext, so set before each row paint
   DataGridView1.Rows(e.RowIndex).HeaderCell.Value = DataGridView1.Rows(e.RowIndex).Cells("Header").Value
End Sub

**** Edit:
After thinking it over a bit, this may be a better approach depending on what you are trying to accomplish.

Public Class Form1
   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      ' make some data to show
      Dim dt As New DataTable()
      With dt
         .Columns.Add("Header", GetType(String))
         .Columns.Add("C1", GetType(Int32))
         .Columns.Add("C2", GetType(Int32))
         .Columns.Add("C3", GetType(Int32))
         .Rows.Add(New Object() {"A", 2, 3, 7})
         .Rows.Add(New Object() {"B", 4, 5, 8})
         .Rows.Add(New Object() {"C", 6, 7, 2})
      End With

      DataGridView1.DataSource = dt.DefaultView
      Dim NumColToFreeze As Int32 = 2
      With DataGridView1
         .RowHeadersVisible = True
         For i As Int32 = 0 To NumColToFreeze - 1
            .Columns(i).Frozen = True ' prevents column from scrolling out of view
            .Columns(i).DefaultCellStyle = .RowHeadersDefaultCellStyle ' make it look like a header
            .Columns(i).ReadOnly = True
         Next
      End With
   End Sub
End Class