Listview

A

alias_2003

XLDnaute Occasionnel

• 30 Octobre 2015

• #2

Re : Listview

Bonjour le Forum,
J'essaie de voir si ma demande est réalisable ! Voici où j'en suis !
L'idée étant de mimer cette procédure lorsque l'on clique sur chacun des en-tête de la listview !

Je bloque sur la recherche plein texte et le treeview...
Quelqu'un aurait-il la gentillesse de me donner un coup de main ?
Merci beaucoup,
Bonne journée

 

Pièces jointes

• test.jpg

  88.9 KB · Affichages: 119
• Test.xlsm

  30.1 KB · Affichages: 81
• Test.xlsm

  30.1 KB · Affichages: 73

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 30 Octobre 2015

• #3

Re : Listview

Bonjour Pierre,
Merci beaucoup de ta réponse ! Oui, ta solution me convient presque à 100% Néanmoins, j'aurais aimé, si possible, avoir également la possibilité de filtrer les données de la listview, en n'utilisant que la textbox. Par exemple, en tapant "ED", avoir toutes les lignes qui contiennent "ED" dans n'importe quelle colonne.
Je viens de regarder ton code et wouahh, c'est complexe ! J'espère pouvoir l'appliquer à mon fichier "réel".
MERCI encore de ta réponse,
Bonne journée,
Amicalement

 

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 30 Octobre 2015

• #4

Re : Listview

Bonsoir Pierre,

Ah, ok, donc exit la liste de choix de l'entête.

Cliquez pour agrandir...

C'est vraiment la solution idéale mais je doute que ce soit faisable... Si tu as des idées, n'hésite pas 🙂 !

Pour l'adaptation du code à ton fichier réel, n'hésite pas à demander.

Cliquez pour agrandir...

Je te remercie beaucoup ! C'est très gentil !
Bonne soirée

 

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 31 Octobre 2015

• #5

Re : Listview

Bonjour Pierre,

??heu?? Tu as essayé la version de 20h20? ?

Cliquez pour agrandir...

Si !!
Je te remercie beaucoup pour ton aide !

 

Dernière édition: 31 Octobre 2015

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 31 Octobre 2015

• #6

Re : Listview

Re-,
je me permets de te solliciter à nouveau pour te demander s'il serait possible d'avoir en plus (!):
* une combobox avec la liste des en-tête
* une listbox qui liste les items pour l'en-tete choisi via la combobox??
Quand l'on clique un ou plusieurs item de la listbox, la listview serait mise à jour...
Qu'en penses-tu??
Merci beaucoup

 

Dernière édition: 31 Octobre 2015

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 31 Octobre 2015

• #7

Re : Listview

Message effacé --> doublon

 

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 31 Octobre 2015

• #8

Re : Listview

Re-,
Merci pour ta patience !
Je ne suis pas clair et je m'en excuse...
En fait , j'aurais aimé si possible avoir une combobox qui contienne l'ensemble
des catégories de la listview (cad N°_commande, Client, Employé, Date_commande, À_livrer_avant, Date_envoi , N°_messager, Port Destinataire, Adresse_livraison).

Quand l'utilisateur choisit une catégorie (par exemple Client) via la combobox, l'ensemble des données correspondantes s'affiche dans une listbox (dans cet exemple, Vins et alcools Chevalier, Toms Spezialitäten, Hanari Carnes, Victuailles en stock...)
.
Enfin si l'utilisateur clique sur 1 ou plusieurs item(s) de la listbox, la listview est mise à jour.

Encore toutes mes excuses...

 

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 31 Octobre 2015

• #9

Re : Listview

C'est exactement ça !! Je te remercie beaucoup !
Je n'ai pas assez testé pour voir s'il y a des bugs, je te tiens informé !
Si tu as un peu de temps, aurais-tu la gentillesse de commenter le code, je t'avoue avoir du mal à tout saisir...
Merci beaucoup à toi !

 

Vote positif 0 Vote négatif

grisan29

XLDnaute Accro

• 31 Octobre 2015

• #10

Re : Listview

bonjour tatiak

je viens d'ouvrir le classeur que tu créer pour alias_2003 et je viens d'avoir un bug est ce du a W10 et office 2013 mais cette ligne bug

Code:

 Me.ListBox2.AddItem Me.ListView1.ListItems(i).ListSubItems(Me.ComboBox1.ListIndex).Text

dans ce bloc code

Code:

Private Sub ComboBox1_Change()
Dim i As Integer
    Me.ListBox2.Clear
    ' remplit la listbox2 avec le contenu de la colonne correspondante
    For i = 1 To Me.ListView1.ListItems.Count
        Me.ListBox2.AddItem Me.ListView1.ListItems(i).ListSubItems(Me.ComboBox1.ListIndex).Text
    Next i
End Sub

et c'est quand j'ai clic sur N° command et dans le 1er listbox et puis dans le 2ème que ça c'est produit avec un index of bound a la clé comme te le montre l'aperçu ci dessous

Pascal

 

Pièces jointes

• aperçu bug.jpg

  74.2 KB · Affichages: 72

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 31 Octobre 2015

• #11

Re : Listview

Re-,
Je viens de tester plus "sérieusement", le code bugge régulièrement sur la ligne

Code:

requete = requete & " WHERE UCASE(" & Head & ") ='" & UCase(Search(0)) & "'"

.
Par ailleurs je me rends compte que ton code correspond parfaitement à ma toute première demande !

L'idée étant de mimer cette procédure lorsque l'on clique sur chacun des en-tête de la listview !

Cliquez pour agrandir...

Penses-tu qu'il soit possible d'adapter ton code à l'userform de Recherche ?? Mon responsable me tanne avec ça... Pour rappel, cet userform doit s'afficher lorsque l'utilisateur clique sur les en-têtes de la listview, et doit permettre de filtrer la listview colonne par colonne.

Bien sûr, je comprendrais que tu veuilles stopper à ce point ! Pas de soucis 😱... Tu m'as déjà énormément aidé et ta solution fonctionne !!

Edit : Bonjour Pascal !
Edit 2 : Merci Pierre, je viens de voir ton post #15 !!

 

Dernière édition: 31 Octobre 2015

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 31 Octobre 2015

• #12

Re : Listview

MERCI beaucoup !!
Bonne soirée 😉 !

 

Vote positif 0 Vote négatif

grisan29

XLDnaute Accro

• 31 Octobre 2015

• #13

Re : Listview

bonsoir Tatiak, Alias_2003 et le forum

Tatiak 😎je viens d'apprendre que tu es l'auteur du classeur que j'ai mis dans le post du 31 Oct 2015, 17:00 de ce forum très beau classeur 😎que tu as fait la😎mais il était archivé anonyme chez moi et je n'avais pas de noms a y mettre pour rendre honneur a son auteur

Pascal

 

Vote positif 0 Vote négatif

A

alias_2003

XLDnaute Occasionnel

• 31 Octobre 2015

• #14

Re : Listview

Re-,
Je poursuis mes tests et je me rends compte que lorsque des données sont absentes (cad que le tableau n'est pas plein), la macro plante. J'obtiens une "erreur d'exécution 9. L'indice n'appartient pas à la sélection" !
A+

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 1 Novembre 2015

• #15

Re : Listview

salut

tatiak à dit:

Pour ta demande 'userform de recherche', et après essais de codage ça me semble complexe pour une fonction qui existe déjà dans excel (et complexe=bug assurés).
Je ne vois pas bien la plus-value d'une réécriture de fonction existante.

Cliquez pour agrandir...

Tu as dit tout haut ce que je pensais tout bas mais il semble que le "big boss" semble avoir certaines exigences. En a-t-il conscience ? Sait-il qu'il y a aussi un problème de portabilité avec le contrôle ListView ?

J'avais commencé une recherche* et comme elle prend tournure, je la propose.

* listes déroulantes traitées avec un Module de classe. Attention, ici elles sont indépendantes les unes des autres (sinon, comme déjà dit, on retombe dans un codage plus complexe)

SQL : pas à l'aise, je vais y jeter un coup d'œil. Merci pour l'exemple 😀.

 

Pièces jointes

• Listview(initilisation et recherche).xlsm

  38.7 KB · Affichages: 67

Vote positif 0 Vote négatif