Simpel Tidsregistrering i WOr/excell

I Exel: Tryk Ctr+Skift+:

Så indsættes klokkeslæt.

Vil du hellere klikke, kan du indsætte denne kode i kodearket til Ark1.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then
        Target.Value = Time()
    End If
End Sub

Så indsættes tiden, når du klikker i en celle i A-kolonnen.

Hejsa og tak.
Det gav mig en ide til havd jeg skal gøre.
Kan man ændre tiden til at være dansk format: 23:34:44  timer,minutter,og sekunder.
På forhånd tak.

Jeg fandt ud af at jeg kunne ændre formatet i cellerne til Dansk tid.
Nu kunne jeg så godt tænke mig at kunne skrive, overskrifter over cellerne, men lige netop øverste række i regnearket,felt A1, har jo fået formlen, så hver gang jeg klikker der, kommer der jo dato. Kan jeg fjerne formlen fra den Øverste række?

Giver dig Jkrons point, kan du svare.

Du skal lige fjerne koden fra arket igen. Så kan du slette række 1. Skriv så overskrifterne og indsæt koden igen.

Tak. Men brugeren kan jo så stadigt klikke i A1, og så overskriver den med Tiden.
Kan man ikke udelukke feltet A1 i formlen, eller bede den starte i A2?

Det er ikke fair at jeg bliver ved at stille nye spørgsmål :-) sender point afsted  nu.

Du kan sagtens udelukke A1.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("A2:A65536") Is Nothing Then
        Target.Value = Time()
    End If
End Sub

Hej Jkrons!
Hvis jeg sætter ovenstående ind kommer der syntax error/fejl. linje 2.
Forslag?

Unfdkyld. Der mangelede en parentes:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("A2:A65536")) Is Nothing Then
        Target.Value = Time()
    End If
End Sub

10000 Tak for hjælpen, Det ser ud til at være løsningen.

Jeg lukker tråden her.