Interdire la saisie d'un 29/02

natorp

XLDnaute Accro
Bonjour à toutes et tous

j'aimerai qu'ils soit impossible de saisir un 29/02 d'une année non bissextile sur toute une colonne
Et qu'une fenêtre popup apparaisse pour prévenir l'utilisateur

Merci pour votre attention et votre aide

Cordialement, Gérard
 

Pièces jointes

  • Classeur1.xls
    13.5 KB · Affichages: 45

Jocelyn

XLDnaute Barbatruc
Bonjour le Forum,
Bonjour natorp,

Un essai en passant par la validation de donnée voir la cellule A2 a étendre vers le bas si cela convient

Cordialement

EDIT : Bonjour pierrejean :) désolé pour la collision mais content de te croiser
 

Pièces jointes

  • natorp.xls
    26 KB · Affichages: 46

natorp

XLDnaute Accro
Bjr à vous

Pierrejean : c'est tout à fait cela, il manque juste la suppression de la saisie et le curseur dans la cellule de saisie

Jocelyn : c'est parfait, il suffisait d'y penser, bien vu !!!

Lone-wolf :
j'ai un plantage dès que je mets le curseur en A2 : incompatibilité de type à ce niveau :
Code:
If Day(DateSerial(Year(ActiveCell.Offset(0, -1).Value), _
Month(ActiveCell.Offset(0, -1).Value), Day(ActiveCell.Offset(0, -1).Value))) = 29 Then

Cordialement, Gérard
 

pierrejean

XLDnaute Barbatruc
Re
Parce que Excel l’interprète comme le 17/02/2029
J'ai ajouté de quoi interpréter le 17 comme 2017 mais le fichier ne sera plus valable a partir du 01/01/3000
Reviens à ce moment et on avisera
 

Pièces jointes

  • Classeur1 (13).xls
    36.5 KB · Affichages: 47

Discussions similaires

Statistiques des forums

Discussions
311 724
Messages
2 081 938
Membres
101 844
dernier inscrit
pktla