Discussion :

[Nherve33]

Bonjour,

Je recherche actuellement un tutoriel me permettant de créer un masque de saisie personnalisé pour une cellule.
Je pense que pour certain d'entre vous cela est simple mais j'aimerai savoir comment faire pour que la saisie d'une information dans ma cellule respecte ce type de format :123456-AD01
Soit 6 chiffres plus "-AD" plus 2 chiffres.

Je suis bien aller dans Données/Validation de données mais dans option Formule je coince.

Merci beaucoup.
Bonne journée

[Menhir]

Je suis bien aller dans Données/Validation de données mais dans option Formule je coince.

C'est la même chose que si tu avais à mettre la formule dans une cellule et que tu attendais une réponse VRAI ou FAUX.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=ET(ESTNUM(CNUM(GAUCHE(A1;6)));STXT(A1;7;3)="-AD";ESTNUM(CNUM(DROITE(A1;2)));NBCAR(A1)=11)

[Nherve33]

Merci c'est sur cela semble simple vue comme çà
Non avec le réponse je sens que j'ai là aussi encore beaucoup a apprendre.
Je rigole mais merci beaucoup pour cette formule.

Bonne journée

[Nherve33]

Bonjour,

Je réouvre mon propre poste pour vous demander un complément d'information.
Il s’avère que si je saisie 123456-ad02 les lettres restent en minuscule comment faire pour que celles-ci restent ou passent en majuscule

J'ai bien essayé avec MAJUSCULE mais rien n'y fait

Code formule :

Sélectionner tout - Visualiser dans une fenêtre à part

=MAJUSCULE(ET(ESTNUM(CNUM(GAUCHE(C9;6))); STXT(C9;7;1)= "-"; STXT(C9;8;2)= "AD";ESTNUM(CNUM(DROITE(C9;2)));NBCAR(C9)=11))

ou

Code formule :

Sélectionner tout - Visualiser dans une fenêtre à part

=ET(ESTNUM(CNUM(GAUCHE(C9;6))); STXT(C9;7;1)= "-"; MAJUSCULE(STXT(C9;8;2)= "AD");ESTNUM(CNUM(DROITE(C9;2)));NBCAR(C9)=11)

Bien sûr pas de VBA possible dans mon cas

Merci

[Patrice740]

Bonjour,

Il s’avère que si je saisie 123456-ad02 les lettres restent en minuscule comment faire pour que celles-ci restent ou passent en majuscule

La validation de données ne permet pas de modifier le contenu d'une saisie, elle se contente de refuser les saisies qui ne conviennent pas.
Pour refuser les saisies où "AD" n'est pas en majuscules :
=ET(ESTNUM(CNUM(GAUCHE(A1;6)));EXACT(STXT(A1;7;3);"-AD");ESTNUM(CNUM(DROITE(A1;2)));NBCAR(A1)=11)

[Nherve33]

ok Patrice merci pour ton aide.
Du coup avec une message erreur pour informer les utilisateurs cela est super.
Les utilisateurs ne pourront pas renseigner un code dans un autre format que ce qui est demandé.

Un grand merci à vous tous. En un post j'ai appris bien de nouvelle choses.
J'espère que j'aurai l'occasion de le retransmettre un jour.

Bonne journée

[Nherve33]

RE bonjour a tous,

Je reviens sur mon masque de saisie car nouvelle année oblige nouveau problème.

Il s'avère que le texte "AD" est trop restrictif.
comment faire pour que celui-ci soit remplacer par 2 lettres en MAJUSCULE.

J'ai essayé avec ESTTEXTE mais sans succès

Code formule :

Sélectionner tout - Visualiser dans une fenêtre à part

=ET(ESTNUM(CNUM(GAUCHE(C9;6)));EXACT(STXT(C9;7;1);"-"); EXACT(ESTTEXTE(C9;8;2));ESTNUM(CNUM(DROITE(C9;2)));NBCAR(C9)=11)

Quelqu'un aurait-il la solution ou un site pour voir les différentes syntaxe possible?

Merci beaucoup

[Patrice740]

Bonjour,

Formule de validation EDIT :
=ET(ESTNUM(CNUM(GAUCHE(A2;6)));STXT(A2;7;1)="-";EXACT(STXT(A2;8;2);MAJUSCULE(STXT(A2;8;2)));ESTNUM(CNUM(DROITE(A2;2)));NBCAR(A2)=11).

EDIT 2 , plus simple :
=ET(ESTNUM(CNUM(GAUCHE(A2;6)));STXT(A2;7;1)="-";EXACT(A2;MAJUSCULE(A2));ESTNUM(CNUM(DROITE(A2;2)));NBCAR(A2)=11)

[Nherve33]

trop rapide vous êtes trop rapide.
et en plus avec deux formules

Mille merci

Si je pouvais

Avez une référence de livre ou de site sur le sujet ?