在另一个单元格中输入数据并按下Enter选项后转到特定单元格

Question

我有一张Excel表格,我正在输入A2,B2和C2中的数据; 在我按下回车后,我希望光标选择下一行,这样我就可以在A3,B3和C3上输入信息,依此类推

我找到了这个信息

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Range("C2").Value <> "" Then
Range("A3").Select
End If
End Sub

但它只能工作一次,我怎么能一遍又一遍地重复这个过程

谢谢你的帮助.....

Answer 1

其他方式.

1. 如果您在Col A中的任何位置键入,则选择将移至Col B.
2. 如果您在Col B中的任何位置键入,则选择将移至Col C.
3. 如果您在Col C中的任何位置键入,则选择将移回Col A(下一行).

代码:这在相关的表单区域中.

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error GoTo Whoa

    Application.EnableEvents = False

    If Not Target.Cells.CountLarge > 1 Then
        If Not Intersect(Target, Columns(1)) Is Nothing Then
            Target.Offset(, 1).Select
        ElseIf Not Intersect(Target, Columns(2)) Is Nothing Then
            Target.Offset(, 1).Select
        ElseIf Not Intersect(Target, Columns(3)) Is Nothing Then
            Target.Offset(1, -2).Select
        End If
    End If
Letscontinue:
    Application.EnableEvents = True
    Exit Sub
Whoa:
    MsgBox Err.Description
    Resume Letscontinue
End Sub

截图

Answer 2

在“工具”>“选项”对话框中，“输入后移动选择”的设置是什么？：

Tech Republic上有更多信息：数据输入期间控制 Excel 光标移动的三种方法，它将向您展示如何准确地执行您想要的操作...

基本上，选择要在其中输入数据的范围单元格，Excel 选择第一个单元格，然后在每次输入后按 {Tab} 键。Excel 会将克拉移动到您选择的下一个空单元格

瞧！