Ahora si entendí, bien, debes modificarlo a tu código ya que yo no lo tengo completo te doy algo aproximado;
Entiende que X e i depende de la columna y celda de tu DataGrid, esos valores no tengo como los tomas para decirte con exactitud.
Una posibilidad es obtenerlos desde la propiedad ToString del mismo CurrentCell;
Ahi lo mostrará en el texto del formulario a modo de ejemplo nomas.
La propiedad CurrentCell es capaz de obtener o establecer la celda actual, por lo que si se lo indicas esté donde esté te llevara a ella.
Saludos.
Código:
Sub posicionarvalor(ByVal valor As String)
For Each dr As DataGridViewRow In GridCarga.Rows
If dr.Cells("CodigoProd").Value = valor Then
dr.Selected = True
GridCarga.CurrentCell = GridCarga.Rows(x).Cells(i)
End if
Next
End Sub
For Each dr As DataGridViewRow In GridCarga.Rows
If dr.Cells("CodigoProd").Value = valor Then
dr.Selected = True
GridCarga.CurrentCell = GridCarga.Rows(x).Cells(i)
End if
Next
End Sub
Entiende que X e i depende de la columna y celda de tu DataGrid, esos valores no tengo como los tomas para decirte con exactitud.
Una posibilidad es obtenerlos desde la propiedad ToString del mismo CurrentCell;
Código:
Me.Text = GridCarga.CurrentCell.ToString
Ahi lo mostrará en el texto del formulario a modo de ejemplo nomas.
La propiedad CurrentCell es capaz de obtener o establecer la celda actual, por lo que si se lo indicas esté donde esté te llevara a ella.
Saludos.
Hola, basándome en lo que me pusiste pude obtener una solución.
Código
Sub posicionarvalor(ByVal valor As String) Dim indice As Integer = 0 For Each dr As DataGridViewRow In GridCarga.Rows If dr.Cells("CodigoProd").Value = valor Then dr.Selected = True indice = dr.Index End If Me.GridCarga.CurrentCell = GridCarga.Item(1, indice) Next End Sub
Te agradezco mucho el tiempo que dedicaste, gracias!.
Saludos.