Erreur 424
Bonjour à tous,
J'ai un petit problème sur un usrform. (ci-joint le fichier)
Quand je veux ajouter (avec le bouton AJOUTER) les données dans ma feuille j'ai un code Erreur 424 je ne comprend pas tres bien.
D'autre part est il possible de faire une recherche par mot clé sur mon formulaire ? (ou bien peut être est il mal conçu)
Merci pour votre soutien
Bonjour,
dans Private Sub btnAjouter_Click(),
Cells(Range("A10000").End(xlUp).Row + 1, 1) = txtArtistes.TexttxtArtistes (a priori une TextBox) n'existe pas sur le UserForm
A+
bonjour
salut au passage AlgoPlus
ma suggestion :
- faire la saisie directement dans le tableau, sans userform
- recherche par mot clé : ctrl+F "toutes occurences". Pas de code non plus.
pas de code, pas de formules, ça marche et ça marchera encore dans 20 ans, sur tous supports
amitiés à tous
Bonjour AlgoPlus, JMD,
Pour répondre à AlgoPlus : la txtbox existe bien dans le usrform mais été mal orthographiée, avec la bonne orthographe le problème persiste.
Pour répondre à JMD : effectivement on peut se passer d'un usrform pour rentrer toutes les données sur la feuille, mais à quoi servent les usrform si on peut s'en passer ?
Merci à tous les 2
Bonjour à tous,
On s'en passe quand ils n'apportent aucune plus-value, voire même des moins-value.
Tu n'arriveras jamais à égaler les facilités de recherche que tu as en déroulant le filtre auto, d'autant plus que tu peux les cumuler sur tous les champs.
Au mieux tu feras pareil avec des centaines de lignes de code.
Ta plus-value se limite à éviter un scrolling horizontal, à toi de voir si c'est suffisant pour que ça vaille le coup. Peut-être pour l'ajout, mais pour les recherches...
eric
Bonjour eriiic,
Je voulais passer par un usrform pour m'initier au VBA et comme j'ai beaucoup de colonnes je pouvais les voir toutes sur le formulaire.
Mais il existe surement d'autres solutions sans passer par le vba.
Merci
la txtbox existe bien dans le usrform mais été mal orthographiée, avec la bonne orthographe le problème persiste.
dans :
Cells(Range("A10000").End(xlUp).Row + 1, 1) = txtArtistes.Textla TextBox txtArtistes n'existe pas dans l'USF!
Mal orthographiée ne change pas le problème, pour le code elle n'existe pas.
avec :
Cells(Range("A10000").End(xlUp).Row + 1, 1) = txtArtiste.Textje ne détecte plus d'erreur !
Qu'avez vous modifier ? le code ou le nom de la textbox ?
Pour répondre à JMD : effectivement on peut se passer d'un usrform pour rentrer toutes les données sur la feuille, mais à quoi servent les usrform si on peut s'en passer ?
- à se créer des problèmes
- à faire comme dans un vrai progiciel, en oubliant qu'aucun progiciel n'est basé sur Excel ni sur autre tableu. A "se la pêter" si tu préfères
Date de l'époque où les SGBD étaient payants, aujourd'hui il y a OOOBase
amitiés
j'ai juste enlevé le s de txtArtiste mais j'ai toujours l'erreur.
La txtArtiste est en haut du usrform dans un cadre (elle est bien présente)
Je ne vois toujours pas où çà coince
JMD je crois comprendre que tu es un pro d'excel et si tu n'es pas d’accord sur ma façon de faire n'intervient pas. Je peux comprendre que l'on ne soit pas du même avis, mais si ton intervention est juste là pour me dénigrer, je peux m'en passer.
Un forum c'est fait pour apprendre.
T'es pas obligé de répondre à mon problème s'il t’intéresse pas
Merci
l'erreur est toujours sur la même ligne?
Je ne reproduit pas d'erreur après suppression du "s" !
Ben OUI.......j'ai essayé de changer de nom de classeur au cas où mais rien n'y fait.
Désolé
Ben OUI......
Est ce la réponse à ma question "l'erreur est toujours sur la même ligne?"
Si oui , il n'est pas évident que l'erreur survienne encore sur la même ligne , d'autant qu'après correction du nom de Textbox, il n'y a plus d'erreur chez moi!
Le N° d'erreur est-il le même ?
Non le message n'est plus le même : La méthode "default de l'objet Range a échoué"
Si le code n'a pas changé par rapport au classeur déposé, je ne vois pas.
Je n'ai rien changé au code de départ mis à part d'enlever le (s) de txtArtiste.......
C'est pas grave merci d'avoir planché sur mon problème