Question

excel中制作个按钮，怎么实现按一下，让单元格的数值自动加1？

hunter2k 能否给个具体的步骤？

Answer 1

用函数，另起一列，（例如数据在A1）在其中输入=A1+1，下面的往下托即可

Answer 2

Private Sub CommandButton1_Click()
'Cells(1, 1) = Cells(1, 1) + 1 '指定单元格一行一列内容加一
ActiveCell.Value = ActiveCell.Value + 1 '选定单元格内容+1

End Sub

Answer 3

在主菜单点击"视图"，"工具栏"，"控件工具箱"后会跳出一个控件工具选择框。选择"命令按钮"后，鼠标会变为细的十字标。在工作表范围内按着鼠标左键，然后拉动就会出现控件按钮就放开鼠标左键。按钮键就完成了，把鼠标移到按钮键双击鼠标左键就进入VBA编辑器。再把以下代码拷贝到编辑器中。
Private Sub CommandButton1_Click()
ActiveCell.Value = ActiveCell.Value + 1 '选定单元格内容+1
ActiveCell.Offset(1,0).Select '自动移到下个单元格
End Sub