Bonjour,
Je sais que la question de venir implémenter automatiquement une date qui reste statique dans une colonne Excel est un sujet redondant.
Je ne suis pas du tout un spécialiste de VB donc je me suis inspiré de la connaissance d'autres experts.
Voici le code : Private Sub Worksheet_Change(ByVal R As Range)
If Intersect(R, [B:B]) Is Nothing Then Exit Sub
R(1, 0) = IIf(R <> "", Date, "")
End Sub
Lorsque l'utilisateur met son trigramme (via une liste de choix), la date du jour vient s'inscrire automatiquement.
Et cela fonctionne...
Sauf que lorsque je veux protéger la feuille et rendre la colonne Date inaccessible en écriture pour l'utilisateur, j'ai une erreur :
Pouvez-vous me dire où cela cloche ?
Ci-joint mon fichier test.
Merci d'avance pour votre aide.
Merci Oneida pour votre réaction rapide.
Malheureusement en remplaçant mes codes par les vôtres, cela ne fonctionne toujours pas et j'ai le même message...
Re,
Chez moi, pas de probleme!
Je vous mets votre fichier modifie en pj
Pouvez metter votre fichier a dispo, car "remplaçant mes codes par les vôtres" signifierait que vous n'avez pas mis le fichier original a dispo
Je n'ai protégé que la colonne A dans ce cas-ci...
Quand même fort étrange que nous ne puissions pas écrire via VB dans une colonne protégée alors que via une formule comme Aujourdhui(), cela fonctionne (mais la date est dynamique)...
Si ça marche la liste de validation même sur une feuille protégée puisque cette colonne ne peut pas être protégée si chaque cellule doit être complétée mais validée par la liste
Si ça marche la liste de validation même sur une feuille protégée puisque cette colonne ne peut pas être protégée si chaque cellule doit être complétée mais validée par la liste