DataGridが苦手なので、少し復習します。
'カーソルを特定の1行まで移動させる For Each dr As DataGridViewRow in grdテストグリッド.Rows 'strIDには、システムIDのデータの1つが入っている If dr.Cells("テストID").Value = strID Then grdテストグリッド.Rows(dr.Index).Selected = True End If Next 'カーソルの場所までデータグリッドをスクロール grdテストグリッド.FirstDisplayedScrollingRowIndex = _ grdテストグリッド.SelectedCells(0).RowIndex
DataGridViewのColumnではなくRowを使って、データを取り出すというのが頭にしっくりきません。
忘れないように気をつけます。
似たようなコードをもう一つ。
For Each dtGrid_test As DataGridViewRow In grdテストグリッド.Rows 'NullValueエラー回避 If dtGrid_test.Cells("テストコード").Value = Nothing Then Exit For End If str_test = dtGrid_test.Cells("テストコード").Value.ToString().Trim() str_selectedvalには、インサートしようとしているデータが入っている。 If str_test = str_selectedval blCheck = False Call MsgBox("重複しています",Me) Exit Sub End If Next