VBA - Comment créer un Formulaire de Recherche ?
HTML-код
- Опубликовано: 5 сен 2024
- Bonjour,
Dans cette vidéo vous allez apprendre comment réaliser un formulaire de recherche en VBA :
- Création du formulaire
- Ajout des contrôles
- Saisie du code vba pour piloter le formulaire
- Formatage des données en VBA
**********************************************************
Cliquez sur le lien ci-dessous pour télécharger le fichier :
learnaccess.kn...
**********************************************************
Vous souhaitant un bon visionnage.
================================================
Consulter ma Boutique en ligne :
learnaccess.kn...
================================================
Learnaccess *********************************************************************************************************
Utiliser mon lien de parrainage pour acheter un produit Tesla et obtenir des crédits gratuits :
- kilomètres gratuits en Superchargeur
- des vêtements et accessoires.
ts.la/jeanpaul...
*************************************************************************************************************
Votre capacité à transmettre est admirable.
Bonjour, je n'avais pas vu ce tuto, et il a apporté toutes le réponses à mes questions !! Merci merci ! Mon formulaire fonctionne, c'est super !
Oh lala !! Vous êtes un vrai prof !!!!! SIMPLE, CLAIR ET EXPLICITE. Merci de tout coeur.
Bonjour je voudrais remercier pour votre formation, une explication très simple
Merci Grand Prof
Bonjour et merci beaucoup pour vos tutos .
Vos tutos mon permis de Peaufiner certains de mes petits programmes. Cependant seriez-vous assez aimable pour nous expliquer prochainement dans un tutos comment rendre visible dans un formulaire des labels et TextBox en fonction du contenu d’un CoboBox. J’espère que je me suis bien fait comprendre.
Avec tous mes remerciements.
Bien Cordialement.
Bonjour !!!! genial comme video, un immense merci !!!!! dommage une petite chose, c'est que l'affichage n'est pas en pleine écran, bravo pour vos vidéos de qualité
faudra mettre en qualité 1080 HD dans les parametres de video
Merci beaucoup
Bonjour, merci pour la vidéo, cependant elle n'est pas très visible, elle ne prend pas la fenetre entiere, et il est difficile de lire les instructions VBA.
faudra mettre en qualité 1080 HD dans les parametres de video
Bonjour, super tuto ! Cependant je rencontre un soucis.
En effet à 29:00 minute de votre tuto il me notifie d'une erreur.
J'ai beau écrire le nom que j'ai donné dans 'rowSources' ou bien celui que j'ai mis en en-tête de ma colonne rien ne fonctionne 😌
De plus les valeurs de mes cellules comporte des chiffre et des lettres...
Pouvez-vous m'aiguiller ! Merci
Bonjour, merci pour vos vidéos. Etant novice dans la programmation VBA, j'arrive à travers vos vidéos à appréhender le fonctionnement VBA. J'ai une question : comment limiter la recherche si le contenu de la cellule ne figure pas dans la colonne servant à la recherche (intégrer un code pour compter le nombre de lignes non vides puis rechercher le contenu de la cellule dans le nombre de lignes). Merci.
Bonsoir.J'ai réalisé mon 1er formulaire de recherche en m'appuyant sur votre tuto qui est très bien expliqué.Je rencontre juste un problème quand on boucle tous les matricules de la colonne A.Dans mon cas j'ai 550 lignes mais uniquement à ce jour que 20 lignes complétées.Si j'entre le numéro exact de la ligne, je dispose de toutes les informations des colonnes mais si j'indique par exemple dans le champs matricule le chiffre 100 qui n'est pas complété, excel cherche sans succès et plante...Je pense que c'est la fin du code "loop" qui pose le problème...
bonjour, c'est tres clair. cependant j'ai un probleme: comment eviter le plantage lorsqu'on tape un nom qui n'existe pas dans la liste.
Avec mes remerciements anticipés
on error resume next
Bonjour et merci pour cette vidéo . Cependant comment faire s'il vous plait pour créer un identifiant qui s'incrémente automatiquement à chaque enregistrement ?
Merci
J’ai déjà fait un tuto
Saisie numéro facture automatique
@@Learnaccess merci, je n'hésiterai pas à le regarder. Je découvre votre chaîne et j'aime beaucoup son contenu, du courage à vous.
Malheureusement c'est pas visible
Bsr, merci pour les tutoriels, je veut savoir est ce qu'on peut faire une recherche dans si le nom existe déjà, avec une recherche phonétique, pour éviter les erreurs de saisie
Je ne crois pas que Excel sache faire
Merci pour votre effort
je voulais qu’après la recherche je copie toute la ligne ou la valeur est trouvée dans une autre feuille excel
merci
Il suffira de rajouter un code vba
Sélectionne la ligne active
Faire copier
Coller sur la feuille désirée
Bonjour,
J'espère que vous allez bien.
Excellent votre formulaire de recherche mais n'y a t-il pas moyen de faire une recherche et de modifier par exemple le salaire (ou autre chose) ?
sinon
Avez vous fait un tuto expliquant comment allez chercher quelque chose puis de modifier une ou plusieurs données ?
merci à vous
Alain
J’ai des tutos qui apprends comment
Ajouter
Rechercher
Modifier
Supprimer
Des données dans une base via un userform
Slvp commeent ajouter une autre bouton 'imprimer" sur ce formulaire pour qu'il nous amènera a imprimer une autre feuille sur le classeur
Bonjour, superbe vidéo encore une ;-)!!! Cependant, j'ai une question, ayant réalisée grâce à vos 3 modules de création d'un formulaire de saisie, pour le suivi des consultations de patients pour ce début d'année et que je vous remercie, soit dit en passant ;-). Je souhaiterai savoir si sur celui ci, je pourrai y rajouter ces 2 autres fonctions "Rechercher et Modifier", afin d'éviter de le faire directement sur la base de données (soit manuellement) ? Merci bcq pour votre réponse
Ass M
Vous pouvez réunir les 3 fonctionnalités sur un seul formulaire
(Saisie / Recherche / Modification / Suppression)
@@Learnaccess Merci pour votre réponse, et je vous dirai ;-) Amitiés
Bonjour, super tutos, mais j'ai un petit probleme mes recherches sont alphanumerique type "Xx 12345678" et non numerique, comment changer la ligne de recherche "Do until activecell = CLng(me.Txtref)" avec une recherche alpanumerique. ?
Je vous remercie d'avance de votre aide
Dans ce cas
Remplacer le clng par cstr
Bonjour, tout simplement génial. Dans mon formulaire de recherche j ai des numéros de téléphone et il n apparaissent pas au bon format. Quel est la formule à ajouter dans, par exemple, Me.textportablepro=active elle.offset (0,3) et où ? Merci beaucoup
J’ai fait un tuto qui montre comment mettre des formats via un user forum
Je vous laisse le visionner
Bonjour, merci pour la vidéo. j'ai crée un formulaire de recherche mais j'aimerais faire apparaitre l'image dans la recherche. comment puis je faire svp?
J'ai fait des tutos qui montre comment afficher des images à partir d'un Userform
Je vous laisse visionner les vidéos.
Bonjour,
Formulaire de recherche terminé. Après votre tuto d'insertion d'images sur chaque ligne (liste d'adhérents Association pêche), j'ai mis en place votre formulaire de saisie. Maintenant je vais faire le formulaire de modification.
Je viens de le visualiser, il me reste plus qu'à l'appliquer...
Par contre, n'est-il pas possible de déclencher ce formulaire depuis le formulaire de recherche ? Il est dommage d'avoir un outil de recherche et de ne pas pouvoir l'utiliser pour rentrer en modification. Je suis bien sûr que si, vous avez peut-être déjà traité cette solution.
Jean-Pierre
Oui c’est possible
Je pense avoir traité le sujet
Salut on pourrait faire un fichier setup? Pour les applications vba?
Bonjour ,
Lorsqu'on récupère les infos de la source sur le formulaire de recherche, comment spécifier le format d'une adresse email ?
Sur ma base de données j'ai aussi des adresses email mais comment lorsque je fais une recherche sur un formulaire de recherche , l'adresse email apparaître en chiffre
Je vois pas comment une adresse e-mail peut s’afficher en chiffre dans un formulaire
Je pense que le champ qui s’affiche doit provenir d’une autre colonne
@@Learnaccess merci , effectivement c'était une erreur de Codage
Merci
Bonjour,
Merci pour cette vidéo
J'ai une petite question sur la ligne me.txt. En fait je met "Me.txtpanne = ActiveCell.Offset(0, 1)" sur mon code mais sa compile pas, est ce que vous avez une idée de d'oû vient le problème ?
Je vous remercie d'avance
Bonjour,
Avec une ligne de code j'ai du mal à voir votre pb
La syntaxe est bonne, je pense que le pb vient du contenu de votre txtPanne ou de votre Activecell.
Bonjour,
Tout d’abord, merci pour ce tuto très intéressant. J'ai pu faire un formulaire de recherche dans ma BDD à partir du nom de la société (dans la 1ère colonne). J'ai essayé ensuite de faire un deuxième formulaire pour faire une recherche via le nom du client (2ème colonne), mais cela ne fonctionne pas, le formulaire ne va pas chercher les infos dans les autres colonnes). Est-ce normal svp ? Ce formulaire de recherche ne fonctionne qu'avec la première colonne ? Merci d'avance.
Bien cordialement.
Si on lui dit de faire la recherche sur la bonne colonne, pas de raison que cela ne marche pas
Sinon passez par l'outil Filtre Avancé
Bonsoir, lorsque je fais le code :
Do until activecell = CLng(Me.Txtbox1)
il me dit qu'il ya un dépassement de capacité, comment faire ? 😭
Dépassement de capacité veut dire que vous avez définit une variable dans un type spécifique et qui limite les capacités
Exemple ; si vous déclarer une variable de type Interger vous ne pouvez générer des nombre entier
Bonjour, merci pour cette vidéos. Étant novice dans la programmation VBA, j'ai appliquer vos instructions sur une base d’enregistrement de cde. Malheureusement quand je suis dans la partie 'On récupère le numéro de ligne de la sélection active, j'ai un msg d'erreur '"instruction incorrecte à l'extérieur d'une procédure" . Auriez vous une solution à me proposer? merci d'avance
Pb de synxtaxe
Vérifiez votre code
Difficile de vous répondre sans voir le code
@@Learnaccess merci pour votre retour Éventuellement je peux vous transférer le fichier?
@@dominiquekobel4862 Oui mon mail : jeanpaul.bonnetto@gmail.com
Je veux m'aider comment crée une formulaire de recherche avec barcode J'attends ta réponse merci
JE n'ai jamais eu à gérer des Code Barre, surtout qu'il y en a de plusieurs sortes
Essayez de regarder sur le web pour voir si des tutos existes sur le sujet...
Bonsoir,
En voulant saisir un nouvel enregistrement, l'erreur suivante :
Erreur d'exécution '-2147417848 (80010108)
La méthode '-Default' de l'objet 'Range' a échoué.
est réapparue !
J'ai refait ce que vous m'aviez conseillé, mais cette fois rien ni fait...
J'ai remis le même non de tableau, est-ce lui qui serait en cause parce qu'il est long ? Le nom actuel : Liste_Adherents_ANB_Peche
Jean-Pierre
J’ai constaté ce pb depuis plusieurs mois
Il arrive que le VBA ne soit pas compatible avec l’outil tableau
Je pense que ce problème vient d’une récente mise à jour Microsoft car je n’avais pas cette problématique avant
Je n’ai pas de solution pour l’instant
@@Learnaccess Merci pour la réponse ! Cependant ça ne tranquillisait pas... Bon ce matin j'ai refait un essais, et ce matin ça marche ! Grrrrrrrr
Bon du coup je vais, tenter, de terminer mon formulaire "Recherche / Modification".
Où puis-je trouver la liste des codes formats comme le Cdate ? Je cherche celui du Code Postal.
Bonne journée
Jean-Pierre
@@Learnaccess J'ai une réponse au pb ! En faisant des tests pour essayer de comprendre pourquoi des fois ça marche et pas d'autres, j'ai constaté qu'il n'y avait pas de problème lorsque toutes les fenêtres "Développeur" sont fermées. Du coup c'est un moindre mal, en attendant un correctif.
Bonjour,
J'ai repris à compléter mon fichier. Je suis sur la création du formulaire de recherche. J'ai créé le formulaire, défini la colonne de recherche, qui pour moi n'est pas un matricule mais un nom. J'avance en suivant votre vidéo. J'en suis à l'ajout d'un enregistrement pour vérifier, comme vous, que ma "combobox prend bien le dernier enregistrement. Mais là, alors que tout fonctionnait, j'ai une erreur, lorsque je lance le formulaire de saisie, que je saisis mes infos et que je valide, j'ai l'erreur suivante :
Erreur d'exécution '-2147417848 (80010108)
La méthode '-Default' de l'objet 'Range' a échoué.
A la suite de quoi Excel plante, je ne peux pas accéder au débogage.
Je ne sais pas quoi faire !...
Jean-Pierre
Retirer l’outil tableau de votre source
Remettez la en plage
Cela devrait marcher
@@Learnaccess Je viens de faire ce que vous proposiez, dans un premier temps j'ai eu la même erreur avec les mêmes conséquences. Excel a donc fermé mon tableau. J'ai rouvert le fichier et refait un essai, plus de problème... J'avais pour sauvegardé avant le premier essai... Donc tout va bien.
Merci.
Les nouveaux enregistrement, le champ du code postal ne garde pas le bon format, il faut que je force le format dans le formulaire. J'ai vais essayer de trouver comment il faut faire.
Bonne soirée
Jean-Pierre
Bonjour c'est URGENT j'ai essaye de suivre votre astuce pour faire une recherche mais cela ne marche pas.Je dois faire un calendrier lunaire j'ai deja programmé le calendrier (j'en ai mis que 1 de mois car le prof veut qu'on fasse que sur 1 mois) j'ai programmé mes phases luneaires . Quand je veux faire une recherche j'applique votre methode mais cela ne marche pas . Que dois je faire ???? . Es ce que j'ai oublie une etape ou non ?
BOnjour,
Ne sachant pas ce que vous désirez faire et comment vous l'avez fait, je vais avoir du mal à vous donner une réponse.
Cette recherche se fait à partir de quel critère ?
Et vous devez récupérer quoi de cette recherche
J'ai applique votre méthode . J'ai fais une liste déroulante qui sont des jours . Quand je selectionne un jour ca n'affiche pas la phase lunaire automatiquement . Ca fait depuis 1 journée que j'y suis et j'obtient rien
Je peux vous envoyer ce que j'ai fais si vous voulez . Comme ca cela sera plus claire
Ca fait une journée que je suis dessus. J'arrive pas a faire une recherche . Mon calendrier je l'ai fait en colonne (rangée A) et les phases lunéaires colonne aussi(rangée B). Je veux selectionner les données mais ca ne marche pas
J'ai essaye d'applique ca mais ca ne marche pas .
Private Sub ComboBox3Jour_Change()
'Se positionner'
Feuil4.Activate
Range("A1").Select
Do Until ActiveCell = CInt(Me.cbo3Jour)
ActiveCell.Offset(1, 0).Select
Loop
Me.txtPhaseLuneaire = ActiveCell.Offset(0, 1)
End Sub
mon email : jeanpaul.bonnetto@gmail.com
Je vous l'ai envoye
Bonjour, tout d'abord merci pour vos tuto qui sont vraiment excellent et très bien réalisés. J'avais une question, j'ai créer un formulaire de saisie et aussi de recherche, ma recherche se fait par le nom plutot que par le matricule, ca marche très bien ! le seul problème que j'aimerais résoudre c'est que dans mon formulaire de recherche quand je choisis le nom dans la zone de liste modifiable, les noms ne sont pas classés par ordre alphabétique !! Là j'ai que quelques noms mais quand j'en aurais plusieurs dizaines voir centaines cela sera problèmatique. Existe t-il une solution ? Je vous remercie par avance.
William Slowikowski
J’ai fait un tuto qui permet une recherche avec filtrage automatique