Auteur Topic: Tijdsregistratie (gelezen 2099 keer)

spyder · « **Gepost op:** 21 mei 2004, 21:20:57 »

Hoi,

Ik zoek een oplossing voor het volgende probleem.(zie bijlage)
Ik moet een rekenblad opmaken om de start en stoptijden te registreren voor een 100-tal renners die ieder voor zich starten.( Vergelijk het met een tijdrit bij het wielrennen).
Ik ben zelf al zover dat ik met een kleine macro de start en stopknop per renner kan bedienen, maar als ik voor 100 renners deze 2 macro's moet herhalen ,staat er mij nog een berg werk te wachten. (en kom ik aan 200 macro's!!!)

Kan ik dit op een andere manier oplossen?

groetjes

Ingrid B · « **Reactie #1 Gepost op:** 22 mei 2004, 07:25:53 »

In plaats van met knoppen te werken kan het veel makkelijker met een event-macro:

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, _
Cancel As Boolean)
If Target.Cells.Count > 1 Then Exit Sub
If Intersect(Target, Range("B4:C103")) Is Nothing Then Exit Sub
Target = Format(Time, "h:mm:ss")
Cancel = True
End Sub

kopieer de macro naar de werkbladcode

spyder · « **Reactie #2 Gepost op:** 22 mei 2004, 18:22:17 »

Hoi Ingrid,

Werkt perfect zo!!

Veel beter dan 200 knoppen te moeten aanmaken.

thnx

Help!

Menu

Hulp bij posten

Zoeken

Recente topics

Auteur Topic: Tijdsregistratie (gelezen 2099 keer)

spyder

Tijdsregistratie

Ingrid B

Re:Tijdsregistratie

spyder

Re:Tijdsregistratie