[ChrisGT7]

Καλησπέρα Πάνο,

Είναι ευχάριστο που έχεις λύσει αρκετές απορίες σου μέσα από την κοινότητά μας!

Για τον αριθμό του αθλητή, κάνε μια δοκιμή στον παρακάτω κώδικα αν σε βοηθήσει κάπως:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, [P:P]) Is Nothing Then Exit Sub
    'Εδώ γράφεις το όνομα της υπορουτίνας ή τον αντίστοιχο κώδικα
End Sub

Για το πάγωμα του χρόνου όμως, θα πρέπει να ανεβάσεις ένα υπόδειγμα του αρχείου για να μπορέσουμε να σε βοηθήσουμε περισσότερο.

Επεξεργασία: Φαίνεται γράφαμε μαζί και μετά είδα το αρχείο που ανέβασες. Θα το επεξεργαστώ τότε και θα σε ενημερώσω.