Private Sub Worksheet_Change(ByVal Target As Range)
Dim b
If Target.Column = 3 Then
b = Target.Row
Cells(b + 1, 1).Select
End If
End Sub
-----------------------------------------------------------------------
上面“If Target.Column = 3 Then”这条语句里面的3可以改成你想要输完数据后跳到下一行时的那一列列数,按照你的表格应该是6。
上面“Cells(b + 1, 1).Select”这条里面逗号后面的1,改成你想要跳到下一行的对应位置的列,按照你的图片应该是3。
这样就ok了,有用望采纳!
追问请问你行代码,怎么应用到表格内,我是小白,请更详细些。谢谢!
追答在表格界面 按alt+F11
然后输进去就行了
wps里面不知道怎么做。
在office里面这几行代码就很舒服。
不过你可以用你采纳的那个答案了。
目前还未解决。只能用传统移光标了
追答wps里面的宏模块是要开通会员的吧
追问没有提示要开会员啊