Hej,

Jag föflyttar mig i en Data Grid DGGen med följand kod:

<code>Private Sub DGGen_KeyDown(KeyCode As Integer, Shift As Integer)

With DGGen
.CurrentCellModified = True
'When ENTER is pressed
If KeyCode = 13 Then

.AllowUpdate = True
Select Case .Col
Case 0
.Col = 6

Case 6
.Col = 7

Case 7
.Col = 8

Case 8
.AllowUpdate = False
.Col = 0
End Select
'When ESCAPE is pressed
ElseIf KeyCode = 27 Then

.AllowUpdate = False
CBCreate.SetFocus
End If
End With
End Sub</code>

Dvs. om jag befinner mig i Kol.0 och trycker på ENTER så kommer kol.6 att bli aktiv osv.
Problem: När jag hoppar från kol.X till kol.Y så kommer värdet i kol.X att skriva över värdet i kol.Y.

/John