With extractDataGrid
Dim ColumnCB As New DataGridViewComboBoxColumn
With ColumnCB
.HeaderText = "SPECIFICATION"
.Width = 80
.Items.Add("Foo")
.Items.Add("Car")
End With
.Columns.Remove(extractDataGrid.Columns(6))
.Columns.Insert(6, ColumnCB)
End With