Question

如何在excel中实现点击单元格一次，单元格内数字增加一次。同时在一个表格内多个单元都可以试用的？

我用我全部可用的财富来悬赏求答案！！！
如何在excel表格中实现点击某单元格一次，该单元格内数字增加1。同时在该单元格所在表格内的其他多个单元格都可以实现点击一次相应单元格个内数字增加1？举例说明，比如单元格A1，内部初始数据是21，点击一下单元格A1，其单元格A1内部数字就增加1，变成22了。同时单元格G3，内部初始数据是4，点击一下单元格G3，其单元格内部数字就增加1，变成5了。
Private Sub CommandButton1_Click()
Range("A1") = 1 + Range("A1")
End Sub
这个方法只适用一个单元格，但是我是好多个的单元格！这个方法就算了！
我这个是没有特别的按键，要求只点击单元格，单元格内数字就增加，2楼的我试了一下不知道为什么不好使。

Answer 1

在标签上单击右键,点查看代码,插如以下代码:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells <> "" Then
Target.Cells.Value = Target.Cells.Value + 1
End If
End Sub
就ok了

Answer 2

选中单元格把鼠标移动到单元格的右下方变成十字形点住鼠标右键不放拖动到你要填充的位置放开后，会弹出对话筐在这里选择选择你要怎么填充就行了

Answer 3

我的方法最好,把你里面的代码换成以下即可.

Private Sub CommandButton1_Click()

Dim a
a = ActiveCell.Value
ActiveCell.Value = a + 1

End sub

说明:鼠标选中单元格,按一次按钮就能实现.

如果不需要按钮就改为如下:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveCell.Value = a + 1

End Sub

即可.

Answer 4

那你把这个Range("A1") = 1 + Range("A1")语句改成你需要变动的单元格就行了吧？没试过，但感觉可以。