求VBA知识(怎么样控制Excel表中光标的移动),急盼高手,坐等中.....
比如我有张表,有A-G列,现在我在CD两列输入数据,初始光标在C1单元格里要求:当C1里输入数据后,光标移动到D1单元格,D1输入数据后光标移动到C2,C2后到D2,如此...
比如我有张表,有A-G列,现在我在CD两列输入数据,初始光标在C1单元格里要求:当C1里输入数据后,光标移动到D1单元格,D1输入数据后光标移动到C2,C2后到D2,如此循环... 只回车键可用...
展开
展开全部
这个貌似没那么麻烦,不需要用vba,(当然,用vba也可以实现,稍微复杂点)
不用vba实现你举例的方法是:
菜单中,工具-----选项------编辑------按回车键后移动打钩-----方向 选择向右。ok
输入的时候,将你要输入的范围全部选中,即选中C1到D99,两列。
然后马不停蹄的输入加回车即可。
如果一定要用vba,免得更改设置对其他的影响,也可以
在你需要的工作表下加入下列宏代码:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.MoveAfterReturn = True
Application.MoveAfterReturnDirection = xlDown
aa = ActiveCell.Column
If aa = 3 Then
ActiveCell.Offset(-1, 1).Select
End If
If aa = 4 Then
ActiveCell.Offset(0, -1).Select
End If
End Sub
不用vba实现你举例的方法是:
菜单中,工具-----选项------编辑------按回车键后移动打钩-----方向 选择向右。ok
输入的时候,将你要输入的范围全部选中,即选中C1到D99,两列。
然后马不停蹄的输入加回车即可。
如果一定要用vba,免得更改设置对其他的影响,也可以
在你需要的工作表下加入下列宏代码:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.MoveAfterReturn = True
Application.MoveAfterReturnDirection = xlDown
aa = ActiveCell.Column
If aa = 3 Then
ActiveCell.Offset(-1, 1).Select
End If
If aa = 4 Then
ActiveCell.Offset(0, -1).Select
End If
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询