Countdown timers.

Hi Everyone,

I've joined this forum in the hopes that someone will be kind enough to create something for me as my knowledge of excel does not exceed much further than formulas.
Essentially I need a list of countdowns for my store. The sheet will be for the tester, who gives testing times to people who wish to sell their gadgets and games consoles etc. What I need is a spreadsheet that has the following columns:

A: Name of item
B: Testing time (hh:mm:ss)
C: A countdown, preferably turning red when the count drops below 5 mins
D: A button to start the count once the item is given to the tester

The list needs to be about 30 rows in length. I have managed to find formulas to create a single countdown but I cannot figure out the button part and cannot work out how to have multiple countdowns.

Obviously columns C and D are what I am looking for help with.

Any help or advice would be much appreciated, bearing in mind that I know little to nothing about macros etc.

Thanks

Dave

add this macro code 1st.
In developer mode, grab a button (not the Active X one) place on form, it will ask what macro, pick STARTTIMER
F9 once the timer starts to refresh the times.

Sub StartTimer()
Dim h, n, s, vStart

'h1 has the current time
'h2 has the time we started

'A has names
'B has time in h:m:s
'this will fill value:
'C = end time
'D = remain time   =C2-$H$1

vStart = Range("h1").Value
Range("h2").Value = vStart

Range("A2").Select
While ActiveCell.Value <> ""
   If ActiveCell.Offset(0, 1).Value <> "" Then
      h = Hour(ActiveCell.Offset(0, 1).Value)
      n = Minute(ActiveCell.Offset(0, 1).Value)
      s = Second(ActiveCell.Offset(0, 1).Value)
      vEnd = DateAdd("h", h, vStart)
      vEnd = DateAdd("n", n, vEnd)
      vEnd = DateAdd("s", s, vEnd)
      ActiveCell.Offset(0, 2).Value = vEnd
   End If
   
   ActiveCell.Offset(1, 0).Select  'next row
Wend
End Sub