Office中国论坛/Access中国论坛

标题: [求助]请教一个小问题！ [打印本页]

作者: SecurID 时间: 2007-5-17 02:31
标题: [求助]请教一个小问题！
一个经常录入数据的表格 , 通过选项设置 , 可以使得当前单元格在 "Enter时" 自动移动到右边的单元格(默认是向下)。

现在想在此基础上，再增加一项功能：当输完最右边一个数据时，“Enter时”可以自动转到下一条记录的第一个单元格！

请高手指教！谢谢[em27]

作者: fjzjyan 时间: 2007-5-17 19:06
你可从工具à选项à编辑修订选项即可。

要达到后一项功能，先选定数据编辑区从单元格格式的保护选项去掉对号，然后再保护此工作表即可达到你想要的效果。

作者: tony_zhong 时间: 2007-5-18 17:50
或者试试这个,这里假设最右边的列是第10列,可以根据实际修改

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column > 10 Then
Cells(ActiveCell.Row + 1, 1).Select
End If
End Sub

作者: SecurID 时间: 2007-5-18 22:36
十分感谢tony_zhong![em27]

作者: SecurID 时间: 2007-5-18 22:37
fjzjyan所言不是太明白，弄不出来

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)