[HELP] Recherche nom + modification client

Fermé
iati75000 Messages postés 2 Date d'inscription dimanche 2 octobre 2016 Statut Membre Dernière intervention 2 octobre 2016 - 2 oct. 2016 à 11:40
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 - 3 oct. 2016 à 09:18
Bonjour,


Tout d'abord je suis nouveau sur ce forum et pas que !... En effet je débute sur excel dans le VBA.

J'ai pour consigne de construire un logiciel pour un garage automobile. Mais voilà, je suis coincé dans le code et notamment celui dans la recherche d'un nom (déjà existant ou non). Ce que je souhaiterais c'est quand le garage souhaite ajouter un nouveau client il tape d'abord son nom (approximatif, pas besoin de saisir tous le mot du nom juste 2-3 lettres ou plus peuvent permettre de chercher la personne), si celui-ci existe il affiche toutes les personnes portant ce nom dans le carré à droite du formulaire et sinon il ne fait rien (0 client trouvé). Cependant si il ne fait rien alors il est possible d'ajouter ce client avec son nouveau nom, son prénom, ect... (Vous verrez mieux de quoi je parle dans mon fichier ;) ).

De plus si il existe et que l'utilisateur choisi l'un des clients portant ce nom il aura la possibilité de le modifier dans le même formulaire en y modifiant des informations directement dans les textbox.

Cela fait 2 jours que je cherche et je ne trouve pas, je suis vraiment novice dans le VBA (et même la programmation) !

Par ailleurs si vous pouviez aussi modifier mon code pour qu'il soit + clair et plus facile pour moi ou d'autres ca serait avec plaisir ! (Ainsi que de mettre le code correspondant dans les onglets "Fiche client", "Création d'un article/Pièce", ...)


Merci à vous et j'espère trouvé des solutions...

Bon dimanche à tous :)

https://www.k-upload.fr

1 réponse

f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
2 oct. 2016 à 13:51
Bonjour,

Cela fait 2 jours que je cherche et je ne trouve pas, je suis vraiment novice dans le VBA (et même la programmation) !

Plutot sophistique le code pour un novice !!!!!!!
0
iati75000 Messages postés 2 Date d'inscription dimanche 2 octobre 2016 Statut Membre Dernière intervention 2 octobre 2016
2 oct. 2016 à 13:53
Bonjour,


J'ai cherché avant sur internet et j'ai trouvé quelques docs sur lesquels j'ai repris du code, après pour tout ce qui est insertion sur les feuilles c'est moi qui les faits mais j'essaye de trouver par ci, par là :)
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709 > iati75000 Messages postés 2 Date d'inscription dimanche 2 octobre 2016 Statut Membre Dernière intervention 2 octobre 2016
Modifié par f894009 le 2/10/2016 à 14:18
Re,
Si vous le dites ....
Avant de rechercher, faut deja que ca tourne !!!!

Ca (entre autre),
For n = 0 To 6
    Controls("TextBox" & n + 1) = ListRecherche.List(ListRecherche.ListIndex, n)
Next

ca ne peut pas marcher pour deux raisons:
1_ manque Me. devant Controls
2_ Y a pas de TextBox1 a 6
0
Utilisateur anonyme > f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024
3 oct. 2016 à 08:50
Bonjour fs894009,
Petite correction au passage pour iati75000 : & n + 1 => TextBox 1 à 7.
À part ça, tu as fait une très bonne réponse ! Cordialement.  😊
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709 > Utilisateur anonyme
Modifié par f894009 le 3/10/2016 à 09:10
Bonjour,

En effet, c'est bien de 1 a 7. Mais peu importe, y en a pas. De plus pour la recherche c'est plutot coton car Nom et Prenom ne sont pas en majuscule ce qui faciliterait la chose.
A part ca, ce qu'il demande est assez simple
0
Utilisateur anonyme > f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024
3 oct. 2016 à 09:13
Et en utilisant UCase$(Nom) et UCase$(Prenom), ça peut aider ?  😉
0