Discussion :

[Bouillou35]

Bonjour,

J'ai un petit souci que je n'arrive pas à résoudre et surtout je ne comprends pas pourquoi cela ne marche pas.

Mon fichier (qui est en PJ) permet de rajouter des contrôles les uns à la suite des autres en choisissant chacun des critères et un chiffre lui correspondant. Le problème est que quand j'arrive au contrôle 10 le bouton valider reste bloqué et pas moyen de savoir pourquoi.

Merci d'avance pour votre aide,

[Marc-L]

Bonjour,

pour comprendre, juste placer un point d'arrêt dans le code puis suivre sa progression en mode pas à pas via la touche F8 …

[Bouillou35]

Bonjour,

Merci pour ta réponse,

J'ai essayé en mode pas à pas mais je n'arrive pas à comprendre pourquoi il ne veut pas passer à la ligne suivante. Cela marche très bien lorsque l'on met un seul chiffre mais dès que l'on passe à deux chiffres impossible de valider et pourtant pas de message d'erreur..

[Marc-L]

Si tu veux comprendre et résoudre, pas mieux que le mode pas à pas …

[Bouillou35]

Et je fais comment si même avec le mode pas à pas je m'en sors pas ? Je suis pas fortiche en VBA alors j'ai du mal à tout capter.

[Gado2600]

Bonjour,

J'ai télécharger ton fichier mais je pense qu'il va falloir que tu expliques un peu plus le système de ton fichier...
Tu parles d'avoir créer un userform avec un bouton "valider" mais duquel s'agit-il ?
Dans quel morceau du code cela plante-t-il ? A quelle ligne ?

Bref, il manque des informations pour qu'une personne puisse t'aider.

Cordialement,

[Bouillou35]

Bonjour,

Le but est d'ajouter des points de contrôle avec l'userform1 et qui se rajoutent dans la feuille "RS11" et dans le même temps cela compte le nombre de contrôle que l'on a par journée. On renseigne s'il s'agit d'un contrôle production, 5S, maintenance ou sécurité puis on renseigne si on veut le faire une fois par semaine, par mois ou par jour et on renseigne le numéro de ce contrôle. Dans cet userform1 je ne peux valider si un élément n'est pas coché (sauf si ils sont grisés).

Mon problème dans cet userform1 est que je ne peux pas valider un contrôle si dans ma textbox1 je mets un nombre. Je peux mettre 1, 2, 3, 4, 5, 6, 7, 8 ou 9 je n'aurais aucun problème pour valider mais lorsque je passe à 10, 11... impossible de valider mais je n'ai pas de message d'erreur, je clique dessus mais rien ne se passe. Ce qui est bizarre c'est que dans mon userform2 je n'ai pas du tout ce problème (Cet userform me sert pour modifier ou supprimer un contrôle rajouté).

Je pense que le souci pourrait venir de cette ligne de code dans mon CommandButton49_Click :

Code :

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

If ((Me.TextBox1 = 1) And (CPRS11.Value = True Or CSRS11.Value = True Or C5SRS11.Value = True Or CMRS11.Value = True) And (QuoRS11.Value = True Or MenRS11.Value = True) And (MatinRS11.Value = True Or AMRS11.Value = True Or NuitRS11.Value = True)) Then

Je suis bien conscient que mon fichier n'est pas très clair car je suis débutant en VBA (Ah bon ??) et qu'il n'est pas tout à fait finaliser dans la mise en forme mais j'espère que j'ai été clair dans ce que j'ai pu expliquer et que quelqu'un pourra m'aider.

[Bouillou35]

Bonjour,

Problème résolu il fallait simplement rajouter If (Len(Me.TextBox1 = 1) And... dans le code.

En revanche j'ai une autre demande ce serait de pouvoir empêcher l'ajout de doublons au niveau des chiffres/nombres et seulement au niveau des chiffres/nombres et je ne sais pas comment m'y prendre.

Est ce que quelqu'un aurait une idée ? Merci,