title: Countdown Timer Excel VBA - Code crashed excel
body: <p>Could someone offer an insight into why this crashes my excel, i cant seem to work it out. 
  Im trying to learn VBA and need some advice.    </p>
  
  <pre><code>sub timer()
  
      dim second
  
      second = 1.15740740740741e-05 
  
  'this is the amount excel counts as a second
  
  line1:
  
      application.wait "00:00:01"
  
      Range("a1").value = Range("a1").value - second
  
      if not range("D2").value = 0 then
  
          Goto line1
  
              else
  
              Msgbox("Countdown ended")
  
      End if
  
  end sub
  </code></pre>