Private Sub ComboBox1_SelectedIndexChanged() For i as integer = 0 to DataGridView1.RowCount-1 'コンボボックスで選択されている値と同じ値の場合そのセル(行?)を選択する If DataGridView1(コード列,i).Value = ComboBox1.Text Then DataGridView1(コード列,i).Selected = True End If Next End Sub