Validation erronée d'une saisie textbox [Résolu/Fermé]

Signaler
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017
-
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017
-
Bonjour,

voila mon problème, je bute sur la validation d'une textbox
voici le code

Private Sub txt_Série_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)

If txt_Série.Value = "" Then
MsgBox "Ce numéro de saisie n'est pas valable", vbInformation + vbOKOnly, "Article non trouvé"

Else
Feuil11.Range("C1").Value = Me.txt_Série.Value
Me.txt_Désignation = Feuil11.Range("C3").Value
txt_Qté = Feuil11.Range("C4").Value
txt_Référence = Feuil11.Range("C2").Value
txt_Date = Feuil11.Range("C5").Value
txt_Classe = Feuil11.Range("C6").Value

End If

End Sub

tous ce passe bien tant que je rentre un numéro qui se trouve dans un tableau si j'ai malheur de faire une erreur de frappe ou entrer un numéro erroné sa bug sans que n'apparaisse le MsgBox
je pense que l'erreur se situe dans la condition mais comme je suis une quiche en vba je galère pour trouver la solution.
d'avance merci a tous ceux qui voudront bien me consacrer un peut de leur temps.

4 réponses

Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020
1 414
Bonjour,

Quand ca "bug", quelle ligne de code est surlignee si vous cliquez sur debugage ?
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017

cette ligne

Me.txt_Désignation = Feuil11.Range("C3").Value
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020
1 414 >
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017

Re,

Oui, et le message de l'erreur .....
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017
>
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020

message

erreur d'exécution '-2147352571 (800200005)':
impossible de définir la propriété value. le type ne correspond pas

en fait cet textbox envoie la valeur dans une cellule qui déclenche une recherchev ou je récupère le résultat
dans une simple feuille excel j'aurais un message d'erreur du type #N/A
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020
1 414 >
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017

Re,

Vous pouvez mettre votre fichier sans donnees confidentielles a dispo

Pour transmettre un fichier,
Veillez a ce qu'il n'y ait PAS DE DONNEES CONFIDENTIELLES
il faut passer par un site de pièce jointe tel que cjoint.com

Allez sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017

Bonjour, Dsl pour le retard boulot oblige
voici le lien
je n'ai pas fini de construire le formulaire alors tout les boutons ne fonctionne pas encore j'ai aussi alléger le fichier de tous les feuilles contenants des données sensibles.
Pour le formulaire il faut d'abord valider les défauts avants de cliquer sur valider (ca aussi il va falloir que je code).

http://www.cjoint.com/c/GDBhjonbQpl
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020
1 414
Bonjour,

fichier avec formules modifiees feuille Commande lignes 6 a 12

https://www.cjoint.com/c/GDBijZhaAqf
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017

bon ben je ne sais pas pourquoi je peut plus ouvrir ce fichier ??
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020
1 414
Re,
Je viens de le telecharger et c'est ok......
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017
>
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020

ca doit venir de ma machine au bureau ca me dit de vérifier le format ou l'extension
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020
1 414 >
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017

Re,

.XLSM: au moins EXCEL2007
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017
>
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020

après avoir tortiller le lient dans tous les sens pas moyen, je vais attendre d'être a la maison pour l'ouvrir.
merci en tous cas, je donne des nouvelles a ce moment là
Messages postés
13
Date d'inscription
mercredi 1 mai 2013
Statut
Membre
Dernière intervention
19 septembre 2017
>
Messages postés
15433
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
30 novembre 2020

voilà a la maison avec mon pc je l'ouvre sans problème.
je viens de voir les formules modifiées c'est bête comme choux je n'y ai pas pensé,
et çà fonctionne a la perfection
un grand merci pour la réactivité et le temps passé