' Build the column header string with appropriate column names
strColHeader = ""
strColHeader = strColHeader & "Quote Date" & vbTab & "Quote ID" & vbTab
strColHeader = strColHeader & "Created By" & vbTab & "Customer"

' Write the string to the grid
.AddItem strColHeader, 0


' Here you can create all your data rows but
' you must create at least one more row before you can set
' your column header row(s) in the next step


' Tell the grid that you want one row to be your column header row
' Apparently it will choose the first row that you created above
.FixedRows = 1