title: Stopwatch stops upon cell edit/change
body: <p>I have a problem with a stopwatch. Whenever a cell is edited on the same sheet/workbook or a separate Excel file the stopwatch stops.</p>
  
  <p>I know that the issue is related to the fact that when you open a cell for editing all macros suspend.</p>
  
  <p>Is there a workaround which can be used in my particular case?</p>
  
  <p>NOTE: I need to obtain the time elapsed as a value so that it can be used in another function of the file.</p>
  
  <pre><code>    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("F5") = 0 Then
        StartTime = Timer
        PauseTime = 0
        LastTime = 0
      Else
        StartTime = 0
        PauseTime = Timer
      End If
      StartIt:
        DoEvents
        If StopIt = True Then
          LastTime = TotalTime
          Exit Sub
        Else
          FinishTime = Timer
          TotalTime = FinishTime - StartTime + LastTime - PauseTime
          TTime = TotalTime * 100
          HM = TTime Mod 100
          TTime = TTime \ 100
          hh = TTime \ 3600
          TTime = TTime Mod 3600
          MM = TTime \ 60
          SS = TTime Mod 60
          Range("F5").Value = Format(hh, "00") &amp; ":" &amp; Format(MM, "00") &amp; ":" &amp; Format(SS, "00") &amp; "." &amp; Format(HM, "00")
          If ResetIt = True Then
            Range("F5") = Format(0, "00") &amp; ":" &amp; Format(0, "00") &amp; ":" &amp; Format(0, "00") &amp; "." &amp; Format(0, "00")
            LastTime = 0
            PauseTime = 0
            End
          End If
          GoTo StartIt
        End If
      End Sub
  
  
      Private Sub CommandButton2_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal Y As Single)
      StopIt = True
      End Sub
  
  
      Private Sub CommandButton3_Click()
        Range("F5").Value = Format(0, "00") &amp; ":" &amp; Format(0, "00") &amp; ":" &amp; Format(0, "00") &amp; "." &amp; Format(0, "00")
        LastTime = 0
        ResetIt = True
      End Sub
  </code></pre>