设置KeyPressEdit事件,实现快捷输入:每按一次“w”当前单元格的值就加1。字符型的列可以实现,但整型或小数型的列却没反应,数值不会增加。这是什么原因呢?
代码片段如下:
Select Case e.keyChar
Case "w"
e.Cancel = True
e.Text = e.text + 1
End Select