excel利用VBA输入二位数据后自动跳转下一单元格

lixipeng

各位老师：
    期末在输入成绩时，数据量特别大，上下左右键和回车键用起来非常不方便，现请教老师们在工作簿内任意工作表中从任意一个单元格有规律地开始输入成绩时，如何用VBA或函数自动解决有规律的跳格和跳行，不使用上下左右键和回车键,但是鼠标仍然可以自由运用修改。
例如：
    黄色部分中，我从F7开始输入，输入98后，自动跳到G7单元格输完12后，再自动跳到H7单元格输完5后，再自动跳到i7单元格输完0后，再自动跳到j7单元格输完100后，再自动换行跳到F8输完56后，向右再自动跳到g8单元格输完78后……,这样循环下去。

蓝桥玄霜

请见代码。

lixipeng

不行，我试了的这个代码不得行

740688321

lixipeng 发表于 2019-6-13 07:05
不行，我试了的这个代码不得行

应该可以的，只是没按你的要求写。你要读懂后自己改一下。
'''输入回车后F~J列自动右移，H移到F位，其余下移
Private Sub Worksheet_Change(ByVal Target As Range)
    Select Case Target.Column
    Case 6 To 10
        Target.Offset(0, 1).Select
    Case 11
        Target.Offset(1, -5).Select
    Case Else
        Application.MoveAfterReturnDirection = xlDown
    End Select
End Sub