[HELP] Recherche nom + modification client

iati75000 Messages postés 3 Statut Membre -  
f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   -
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

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    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
    1. iati75000 Messages postés 3 Statut Membre
       
      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
    2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > iati75000 Messages postés 3 Statut Membre
       
      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
    3. Utilisateur anonyme > f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention  
       
      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
    4. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > Utilisateur anonyme
       
      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
    5. Utilisateur anonyme > f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention  
       
      Et en utilisant UCase$(Nom) et UCase$(Prenom), ça peut aider ?  😉
      0