mandar foco a una celda del grid

[tienda]

hola amigos...tengo un grid con 6 columnas, una tiene un campo autonumérico que es plur y este campo lo guardo en un textbox...quiero que cuando se pulse un botón que hay en el formulario la aplicación recargue el grid y luego devuelva la selección del grid a dónde estaba...para ello he guardado el plur en un textbox y le digo que se vaya ahí...pero el problema es que tengo números autonuméricos que ya son de 100000000...por lo que me da un error en estos y no me va a la celda hay alguien que me pueda ayudar?¿?

Dim plur As String
plur = CStr(frmfichasproductos.DataGridView1.CurrentRow.C ells(0).Value)
'frmfichasproductos.DataGridView1.Rows.SharedRow(p lu).Selected = True
frmfichasproductos.DataGridView1.CurrentCell = frmfichasproductos.DataGridView1.Rows(CInt(plur)). Cells(0)
frmfichasproductos.DataGridView1.CurrentCell.Selec ted = False

[josemanuel31675]

has intentad cambiar el Cint por un texto?

[tienda]

hola josemanuel, si lo he intentado, pero me marca error...en plur...lo subraya en rojo, si no lo hago así no hay manera, he probado con decimal y también lo pone así...estoy un poco desesperado..

[tienda]

este es el error exacto;

El índice estaba fuera del intervalo. Debe ser un valor no negativo e inferior al tamaño de la colección.
Nombre del parámetro: index

y el código que tengo ahora es este;

Dim x As New Integer
x = CInt(TextPluOri.Text)
frmfichasproductos.DataGridView1.CurrentCell = frmfichasproductos.DataGridView1.Rows(x).Cells(0)
frmfichasproductos.DataGridView1.CurrentCell.Selec ted = False

el plur que tenía seleccionado es 93572

[tienda]

en cambio si elijo cifras de 200 400 así..del 1 en adelante va bien

[tienda]

el error lo da en esta fila

frmfichasproductos.DataGridView1.CurrentCell = frmfichasproductos.DataGridView1.Rows(CInt(x)).Cel ls(0)

[drako_darpan]

Hola que tal, se me ocurre que manejes una variable global, la cual contendria el renglon donde estas en ese momento ( RowIndex ) y lo unico que ocuparias es que al presionar el boton al renglon le incrementes 1.

Esto lo manejo en C#:

Grid.CurrentCell = this.Grid[0, Grid.CurrentRow.Index];

En tu caso seria:

Int32 nRenglon = Grid.CurrentRow.Index;

Grid.CurrentCell = this.Grid[0, nRenglon + 1];

Espero te sirva

[tienda]

lo he transformado a .net y nada...lo que hace esto es que me envía a la primera celda del grid + 1 no me envía a la celda que estaba seleccionada...ante todo gracias por la ayuda

Dim nRenglon As Int32 = Grid.CurrentRow.Index

Grid.CurrentCell = Me.Grid(0, nRenglon + 1)

así queda en net