Tag: 秒表

当更换其他单元时,Vba秒表无意中重置0

我在Excel电子表格中有一个VBA秒表,代码: Public StopIt As Boolean Public ResetIt As Boolean Public LastTime Private Sub CommandButton1_Click() Dim StartTime, FinishTime, TotalTime, PauseTime StopIt = False ResetIt = False If Range("C2") = 0 Then StartTime = Timer PauseTime = 0 LastTime = 0 Else StartTime = 0 PauseTime = Timer End If StartIt: DoEvents If StopIt = True Then […]

秒表在Excel VBA?

我正在设置一个基本的秒表来跟踪已过的时间。 Button1应该开始在0时钟,Button2停止手表,并logging自计时器启动以来经过了多less分钟和秒钟。 我有工作表上的button,只需要一种方法来计算经过的时间。 什么是最好的方法? 这是我一直在使用的代码 Private Sub CommandButton1_Click() startTime = Timer End Sub Private Sub CommandButton2_Click() Dim finalTime As Single finalTime = Timer – startTime MsgBox Format(finalTime, "0.00") End Sub 这个代码的问题是它显示了我点击button2之后所经过的时间。 我需要在我的Excel表上运行计时器。