Tidtagning ved cykelløb

snakker vi om at køre på en bane?

ja det kunne det godt være men er det vigtigt

ja det er vigtigt ellers så ville jeg ikke spørge.
helt konkret hvad skal det bruges til er det bane eller er det til landevejs?

til bane

det tvivler jeg meget på at du kan lave i excel, man du får lige et link som til Sj compute I/S som du kan kontakte, det er dem der står for tidstagning i de fleste løb her hjemme, der kan du også finde mit navn en del gange.
jeg ved ikke om de kan hjælpe dig man prøv at kontakte dem her :
http://www.sj-compute.dk

mvh bk

jeg vil lige høre, hvor bliver det holdt henne?

Oksbøl

øv det er for langt ellers så ville jeg godt være med :-(

du kan også kontakte ACK for at høre hvad de bruger.http://www.aarhuscykleklub.dk/

Det skulle nok kunne lade sig gøre.
Har du en mail, så kan jeg sende dig et eksempel-ark.
janvogt@esenet.dk

Eksemplet funger ud fra denne kode, som via en inputboks spørger efter rytterens startnummer, og derefter indsætter det nuværende tidspunkt fra pc'ens ur i den første tomme celle i rytterens række.

I eksemplet står rytternes startnumre i området A6:A25, men det skal du selvfølgelig erstatte/udvide med dine egne data.

Koden lægges i et nyt modul, og kan med fordel tilknyttes en knap for at forøge brugervenligheden.

Option Explicit

Sub TagTid()
Dim rCell As Range
Dim bFound As Boolean
Dim iRowNo As Integer
Dim iRytNo As Integer

    iRytNo = InputBox("Angiv rytter nr. ")
   
    For Each rCell In Range("A6:A25")
        If rCell.Value = "" Then Exit For
        If rCell.Value = iRytNo Then
            bFound = True
            iRowNo = rCell.Row
            Exit For
        End If
    Next rCell
   
    If bFound = True Then
        Range(Cells(iRowNo, 1), Cells(iRowNo, 1)).Select
        ActiveCell.End(xlToRight).Offset(0, 1).Select
        ActiveCell.Value = Format(Now, "HH:MM:SS")
    End If
End Sub

>janvogt

Kan jeg også få en kopi af dit eksempel ?

1000 tak for din fine service

Velbekomme :-)

laurbjerg, opgiv en mail-adresse, hvis du ønsker en kopi.

>janvogt

laurbjerg@get2net.dk

sendt

Jeg takker !

Den kunne jeg også godt tænke mig at se, da det lyder som noget man kan lære noget af ;-)

eksperten@brauns.dk

På forhånd tak ;-)

Hej.

Kan godt se det er længe siden det her spørgsmål er blevet besvaret, men jeg har lige et spørgsmål til den der makro ting.

Jeg er ved at arrangere et løb og skal tage tid på løberne.
Til det formål har jeg lånt den ovenstående makro, men ville gerne redigere lidt i den.
I den her linje:

For Each rCell In Range("A6:A25")

er det da ikke muligt at udvide den Range til feks. G10 til G60?

Altså ikke G10 til G60 i stedet for A6 til A25, men sammen med.
Er det overhovedet forståeligt :-)
Jeg har absolut ingen forstand på at programmere, har bare lånt det hele.

Allan Knudsen