本人初次接触VBA，什么都不懂，现在求一段代码，盼高手赐教。。。 问题：一Excel 表 有A-G共7列 ， 现在要求将扫描到的数据填充到其中C、D两列中去，用回车控制光标的位置，初始位置手动给定(在 C或D列中任意位置)，第1个数据输入后 回车 判断 如果光标在第C列 那么输入下一条数据 光标移动到同行的D列（行不变 列+1） 等待下次输入 ，如果光标在D列 那么输入数据 同时光标移动到 下一行的C列 （行+1 列-1）等待输入 ... 也就是说 光标始终在 C D两列来回 急~~~~~~~~~~~~
Sub m1() 'If ActiveCell.Column = 3 Then ' Cells(ActiveCell.Row, ActiveCell.Column + 1).Select ' Else ' Cells(ActiveCell.Row + 1, ActiveCell.Column - 1).Select ' End If Select Case ActiveCell.Column Case 3 Cells(ActiveCell.Row, ActiveCell.Column + 1).Select ActiveSheet.Cells(ActiveCell.Row, ActiveCell.Column).Value = 5 Case 4 Cells(ActiveCell.Row + 1, ActiveCell.Column - 1).Select ActiveSheet.Cells(ActiveCell.Row, ActiveCell.Column).Value = 8 End Select End Sub
温馨提示：答案为网友推荐，仅供参考
