[OK] Vérifier une condition saisie en Inputbox avant accès à un onglet.

[funcky222]

Bonjour à tous,

je bataille depuis quelques jour sur la meilleure façon fiable d'exécuter mon code.
En fouillant un peu à droite et à gauche, j'ai trouvé des éléments, mais rien que je n'arrive à faire fonctionner ensemble.

Mon fichier : 2 onglets.

Onglet "Prio" qui contient l'identifiant de la personne, son nom, la date et une colonne Vrai / "".
Onglet "dispo_ete" qui ne doit s'afficher qu'à certaines conditions.

Pour l'instant, je demande à l'utilisateur de confirmer son identifiant (ex. PAAA123) que je récupère par le biais de Environ("username") dans un inputbox.

La saisie de l'utilisateur doit être comparée à la base de donnée de l'onglet "prio" pour vérifier 2 choses :

1) que l'identifiant saisi est présent dans la liste des personnes autorisées
2) que sur la ligne -1 (celle au dessus) de l'identifiant qui tente de se connecter soit annoté "VRAI", car l'identifiant de la ligne 2 ne peut pas accéder à l'outil tant que l'identifiant de la ligne 1 y est allé, etc...

Je n'ai pas trouvé mieux pour être sûr de respecter un ordre d'accès, mais même là, je n'y arrive pas...

Je vous joins le fichier en exemple.

N'hésitez pas à me poser des questions.

D'avance je vous remercie grandement.

 

[Yaloo]

Re : Vérifier une condition saisie en Inputbox avant accès à un onglet.

Bonsoir funcky,

Pourquoi faire apparaitre le nom de l'utilisateur pour qu'il rentre son identifiant ?
Faut-il vérifier la correspondance entre le nom et l'identifiant ?

A te relire

Martial

 

[funcky222]

Re : Vérifier une condition saisie en Inputbox avant accès à un onglet.

Bonjour Yaloo,

je te remercie de ta réponse rapide.

L'inputbox qui s'ouvre au démarrage du fichier permet de verifier l'identifiant de l'utilisateur et à partir de cet identifiant de vérifier si l'ordre de priorité est respecté, c'est à dire que l'identifiant PBBB456 ne peut pas saisir tant que l'identifiant PAAA123 ne l'a pas fait.

Les noms et dates ne sont que facultatives.

Je ne sais pas si je suis clair...

 

[Yaloo]

Re : Vérifier une condition saisie en Inputbox avant accès à un onglet.

Bonjour Funcky, le forum,

Vois le fichier ci-dessous. Si j'ai bien compris.

A+

Martial

 

[funcky222]

Re : Vérifier une condition saisie en Inputbox avant accès à un onglet.

Re bonjour,

a priori, suite aux premiers testes de ton fichier, cela semble être exactement ce que je recherche.

Je vais voir plus en détail sur mon fichier interne.

Merci beaucoup !

A très bientôt.

 

[funcky222]

Re : Vérifier une condition saisie en Inputbox avant accès à un onglet.

Re bonjour,

j'ai pris le temps de tester les différents codes en situation et tout semble bien fonctionner.

Deux choses restent à améliorer (si je peux dire) mais qui ne me gênent pas :

a) si l'identifiant saisie n'existe pas, cela renvoie un message d'erreur "erreur d'exécution 13" en s'arrêtant sur la ligne "If i = 1 Then"

b) si je clique sur "annuler" de l'inputbox, j'obtiens le même message que ci-dessus.

Je suis preneur des évolutions si quelqu'un passe par là et encore mieux si c'est Yaloo !!

Merci encore.

 

[Yaloo]

Re : Vérifier une condition saisie en Inputbox avant accès à un onglet.

Bonsoir funcky,

Vois dans le fichier les quelques modifications.

A+

 

[funcky222]

Re : Vérifier une condition saisie en Inputbox avant accès à un onglet.

Bonsoir,

je n'ai pas accès à excel ce soir, je ferai les essais dès demain !

Merci d'avance.

 

[funcky222]

Re : Vérifier une condition saisie en Inputbox avant accès à un onglet.

Hello,

plus de message d'erreur en cas de saisie d'identifiant incorrect ni en cs de clic inopiné sur "Annulé".

Parfait.

Juste pour info, dans le code tu as spécifié une condition elseif i = 0 (càd si l'identifiant n'est pas trouvé ou erroné) de faire apparaitre un msgbox. Celle-ci n'apparait pas, la priorité au traitement de l'erreur est fait via le on error goto suite:

Mais ça ne m’intéresse pas d'afficher un message. Donc pas de soucis pour moi.

Je considère cette demande complètement clôse.

1000 mercis.