Microsoft 365 je bloque sur une fonction de recherche

vgendron

XLDnaute Barbatruc

• 7 Août 2023

• #2

Bonjour et bienvenu

1) je te conseille l'utilisation de tables structurées

Tableaux structurés Excel

Tableaux structurés Excel

fauconnier.developpez.com

The VBA Guide To ListObject Excel Tables

For a data analyst, Excel Tables are a necessity! They are the most efficient way to organize your raw data and refer to data that contracts or expands on a regular basis. Likewise, Excel tables can be extremely useful in combination with VBA.

www.thespreadsheetguru.com

2) si les NOMS sont uniques, je te suggère de remplacer le textbox1 par un combobox
sinon, pour avoir la liste des "propositions", il faudrait ajouter un listbox sur le formulaire
va voir dans ce lien

XL 2013 - code VBA pour la recherche

Bonne soirée à vous tous Recherchez un nom avec ses initiales dans TextBox6, et le résultat est écrit dans listBox1. Lorsque vous cliquez sur le nom trouver dans ListBox1, les données sont écrites dans les 7 autres TextBox (les données proviennent de la feuille No . 2) Je vous envoie le fichier...

excel-downloads.com

il y a un textbox : lorsque l'utilisateur saisit quelque chose, la listbox est mise à jour.

 

Vote positif 0 Vote négatif

C

cedelec

XLDnaute Nouveau

• 7 Août 2023

• #3

merci je vais regardé cela

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 7 Août 2023

• #4

je suis en train de jeter un oeil sur ton fichier
les deux formulaires sont quasi identiques.. à un textbox près..
si tes feuilles "Clients" et "CoPro" ne sont pas vouées à évoluer (en terme de nombre de colonnes et leurs nom) on pourrait ne faire qu'un seul formulaire
1) ca allègerait le fichier
2) pas de code en doublon pour les boutons
3) en insérant un bouton, on pourrait basculer d'une feuille à l'autre...

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 7 Août 2023

• #5

Regarde la PJ
1) j'ai modifié les données sous forme de table structurée "t_Copro" et "t_Client"
2) j'ai renommé les deux formulaires..USF_Client et USF_CoPro

sur le formulaire USF_CoPro
j'ai supprimé des boutons (et leur code associé) qui ne servaient pas vraiment à grand chose.. ils font à peu près la meme chose..

un seul bouton d'enregistrement
==> il cherche le nom
s'il existe ==> propose de modifier (=ancien bouton Modifer/enregistrer)
s'il n'existe pas ==> insère le nouveau nom (=ancient bouton "Inserer")

j'ai simplifié les codes en exploitant les tables structurées

 

Pièces jointes

• copro-client v2.xlsm

  40.6 KB · Affichages: 1

Vote positif 0 Vote négatif

C

cedelec

XLDnaute Nouveau

• 7 Août 2023

• #6

Merci,
l'idée est bonne, mais le code plante et je voulais juste rajouter à la recherche une liste qui s'affiche en ne tapant que les premières lettre de la recherche

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 7 Août 2023

• #7

et la.. j'ai ajouté une listbox qui est chargée avec les lignes correspondantes à la saisie de la textbox 1

à chaque lettre saisie en Textbox1, la listbox est mise à jour
si tu cliques sur une ligne de la listbox1, les éléments sont chargés dans le formulaire

 

Pièces jointes

• copro-client v3.xlsm

  43.2 KB · Affichages: 1

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 7 Août 2023

• #8

et la, une version avec un formulaire unique (USF_CoPro) qui permet de basculer d'une feuille à l'autre

==> tu peux donc supprimer le formulaire USF_Client

 

Pièces jointes

• copro-client V4.xlsm

  46.4 KB · Affichages: 1

Vote positif 0 Vote négatif

C

cedelec

XLDnaute Nouveau

• 7 Août 2023

• #9

Au top

Merci, il ne me reste plus qu'à supprimer ce qu'il ne sert à rien .

merci beucoup.

 

Vote positif 0 Vote négatif

C

cedelec

XLDnaute Nouveau

• 7 Août 2023

• #10

vgendron à dit:

et la, une version avec un formulaire unique (USF_CoPro) qui permet de basculer d'une feuille à l'autre

==> tu peux donc supprimer le formulaire USF_Client

Cliquez pour agrandir...

Encore merci

juste un petit bug si je ne clique pas en premier sur le bouton pour basculer de feuille le fichier me renvoie une erreur.

Ci-joint les captures de celle-si

 

Pièces jointes

• exel 1.png

  84.7 KB · Affichages: 6
• exel 2.png

  68.4 KB · Affichages: 7

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 7 Août 2023

• #11

ah oui effectivement,
si on ne clique pas sur le bouton, les variables NomFeuille et NbColonnes ne sont pas initialisées

tu peux utiliser ce code en lieu et place de celui qui existe déjà

VB:

Private Sub UserForm_Initialize() ' initialisation du formulaire
    EnableEvents = True 'variable globale créée pour éviter de lancer intempestivement des évènements _change
    Cbn_Switch_Click 'provoque le lancement en mode "Client"
    'Me.Cbn_Switch.Caption = "CoPro" 'lancement du formulaire en mode "CoPro" ==> Décommenter si besoin de démarrer en mode "CoPro"
End Sub

 

Vote positif 0 Vote négatif

C

cedelec

XLDnaute Nouveau

• 7 Août 2023

• #12

j'a

vgendron à dit:

ah oui effectivement,
si on ne clique pas sur le bouton, les variables NomFeuille et NbColonnes ne sont pas initialisées

tu peux utiliser ce code en lieu et place de celui qui existe déjà

VB:

Private Sub UserForm_Initialize() ' initialisation du formulaire
    EnableEvents = True 'variable globale créée pour éviter de lancer intempestivement des évènements _change
    Cbn_Switch_Click 'provoque le lancement en mode "Client"
    'Me.Cbn_Switch.Caption = "CoPro" 'lancement du formulaire en mode "CoPro" ==> Décommenter si besoin de démarrer en mode "CoPro"
End Sub

Cliquez pour agrandir...

j'adore la prog, tu changes un truc et ça change autre chose lol.

le userform démarre sur client maintenant (pas grave) plus de problème quand on tape sans basculer la feuille. Problème ça n'enregistre plus que dans le tableau client .

et si je décommente on à le même problème qu'au début

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 7 Août 2023

• #13

il restait un bug sur la listbox lorsqu'on passe d'un mode à l'autre

ici:
le USF se lance en mode CoPro puisque le formulaire est "dessiné" avec tous les labels et controls de la feuille "CoPro"

Je te laisse faire des essais et revenir vers moi si il y a des pbs

 

Pièces jointes

• copro-client V5.xlsm

  44.4 KB · Affichages: 2

Vote positif 0 Vote négatif

Solution

C

cedelec

XLDnaute Nouveau

• 7 Août 2023

• #14

Merci

c'est parfait !

 

Vote positif 0 Vote négatif

C

cedelec

XLDnaute Nouveau

• 8 Août 2023

• #15

vgendron à dit:

il restait un bug sur la listbox lorsqu'on passe d'un mode à l'autre

ici:
le USF se lance en mode CoPro puisque le formulaire est "dessiné" avec tous les labels et controls de la feuille "CoPro"

Je te laisse faire des essais et revenir vers moi si il y a des pbs

Cliquez pour agrandir...

Encore merci

juste une question pour essayer de comprendre.

Le module 2 ne sert plus ? et si je veux par exemple changer le textbox 2 en listbox, dans le code faut-il juste déclarer cette liste box à la place du texbox ou cela engendre un gros changement de code ?

 

Vote positif 0 Vote négatif