Macro heure

Bonjour le forum,

comment faire une macro qui entre l'heure comme le raccourci Crtl+: ?

(sur une feuille protégée dans une cellule non verrouillée)

j'ai bien celle ci :

Sub heure()

With ActiveCell

.Value = Time

.NumberFormat = "hh:mm:ss"

.Value = .Value

End With

End Sub

mais elle ne fonctionne plus une fois la feuille protégée...

Merci

Bonjour,

essaye ce code :

Sub heure()
Application.ScreenUpdating = False
ActiveSheet.Unprotect
ActiveCell = Format(Time, "hh:mm:ss")
ActiveSheet.Protect
End Sub

Amicalement

Dan

merci Nad-dan

Cette macro demande le mot de passe et cela ne m'arrange pas!

je crois que j'ai trouvé

Sub heure()

Application.ScreenUpdating = False

ActiveCell = Format(Time, "hh:mm:ss")

End Sub

ça l'air de fonctionner sur une feuille protégée avec un mdp!