hallo

houw can i setup a count down timer

i ame using a scheet with 30 coloms
in eache collum i kan enter a value
the timer has to start when i enter in the 1 kollum /row a value and count down from 10 minuts till 0
and then run a macro

Race 1
Code Zeilnr Naam Punten
DNS Finish 11 FAUQUET --- LICORNE 1
2 Finish 124 SERON --- MYCL 2 15
3 Finish 12 SCHEURS --- MBV 3 124
4 Finish 18 COLLIN --- B.M.B. 4 12
5 DNS 15 HOUBEN --- B.M.B. 8 14
6 DNS 14 GUILBAU --- C.B.R.C.N. 8
7 DNS 16 VAN HOECK --- MBV 8
8 DNS 8
9 DNS 8
10 DNS 8
11 DNS 8
12 DNS 8
13 DNS 8
14 DNS 8
15 DNS 8
16 DNS 8
17 DNS 8
18 DNS 8
19 DNS 8
20 DNS 8
21 DNS 8

ok




this is a example of 1 of the 30 collums
the ok button sets all the not filled in fields whit DNS (dit not finish)
and then the macro calculates the results in an other form

the triggfer cell for this collum is C/4

this is the macro afther the timer is 0


Function Dnssen(race)
Dim y As Integer
Dim z As Integer

col = 3 + (race - 1) * 5
'mogen geen dubbelingen voorkomen
'Col = colom waar de zeilnummers instaan

With Range(Cells(3, col), Cells(43, col))
For x = 4 To 43
Set c = .Find(Cells(x, 6), LookIn:=xlValues, Lookat:=xlWhole)
If c Is Nothing Then 'Deelnemer niet gefinshed
For y = 4 To 43
If Cells(y, col) = "" Or Cells(y, col) = Null Then
Cells(y, col).Value = Cells(x, col + 3)
Cells(y, col - 1).Value = "DNS"
Exit For
End If

Next y
End If
Next x

For z = 4 To 43
If Cells(z, col) = "" Or Cells(z, col) = Null Then
Cells(z, col - 1).Value = "DNS"
End If
Next z
End With

End Function

sugestions please???


greetings raf
ps my excel is 2000 language =dutch
there can be some problems whit the ;., and so on