比如上面的例子,就可以不用那么多按钮,只用1组就好。
先选中待计时的单元格所在行的任一单元格,这样就可以用ActiveCell.Row确定当前单元格的所属行号,然后点开始按钮,停止时点结束按钮。设开始时间为A列,结束时间为C列,分别为两个按钮编写以下过程:
Sub 开始按钮_单击()
Range("A" & ActiveCell.Row).Value = Time()
End Sub
Sub 结束按钮_单击()
Range("C" & ActiveCell.Row).Value = Time()
End Sub
可以,定义一个带参数的通用过程即可
然后每次单机按钮,调用该次命令到参数进通用过程,
解决这个问题最好的方法是用类模块