材料/工具:Excel2010
1、打开Excel2010先输入选项和题目如图
2、按住alt+F11,出现如下窗口
3、打开代码窗口,把如下代码复制进去Private Sub Worksheet_SelectionChange(ByVal Target As Range)Target = Target + 1End Sub
4、保存,然后右上角叉叉
5、最后就是这样点一下,数字就会 加一,弄好之后再按alt+F11,把代码删除保存即可
材料/工具:Excel2010
1、打开Excel2010先输入选项和题目如图
2、按住alt+F11,出现如下窗口
3、打开代码窗口,把如下代码复制进去Private Sub Worksheet_SelectionChange(ByVal Target As Range)Target = Target + 1End Sub
4、保存,然后右上角叉叉
5、最后就是这样点一下,数字就会 加一,弄好之后再按alt+F11,把代码删除保存即可