Faire un tri dans une listView a partir de donnée mis sous forme de tableau

Bonjour,

j'ai un soucis je souhaiterais employer une listView et filtrer celle-ci. Si j'emploie des donées sur une feuille excel cela fonctonne .

Si je les mets sous forme de tableau, ce que je veux, cela fonctionne pas?

Je met le code ci-dessous c'est la ligne 10 qui pose problème,

C'est la première fois que j'utilise une listView. Et de plus débutant en programmation

Merci pour votre aide

Function filter_data_in_another_sheet()
Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Gestion_MAIN_MEC")
Dim dsh As Worksheet
Set dsh = ThisWorkbook.Sheets("BD_FILTRE")
Dim fc As String
fc = TextBox10.Value
dsh.Cells.Clear
sh.AutoFilterMode = False
sh.UsedRange.AutoFilter 2, fc
sh.UsedRange.Copy dsh.Range("A1")
dsh.AutoFilterMode = False
End Function

Bonjour Claude

Ce fil créé par notre ami Thev, vous aidera ceretainement

https://forum.excel-pratique.com/astuces/tableau-structure-instructions-vba-specifiques-a-cet-objet-...

A+

J'ai regarder et je n'ai pas trouver ma solution,

Merci quand même, j'ai Quand même appris différent therme qui me seront utile.

J'ai corrigé mais j'ai encore une erreur et je je ne sais laquelle

voici mon code corriger

Function filter_data_in_another_sheet()

Dim TS As ListObject
Set TS = Range("Tableau4").ListObject
'feuille où se trouve le tableau
Dim feuille As Worksheet
Set [Gestion_MAIN_MEC] = TS.Range.Worksheet
Dim Lstcol As ListColumn
Dim sh As Worksheet
'Set sh = ThisWorkbook.Sheets("Gestion_MAIN_MEC")
'Dim dsh As Worksheet
Set dsh = ThisWorkbook.Sheets("BD_FILTRE")
Dim fc As String
fc = TextBox10.Value
dsh.Cells.Clear
sh.AutoFilterMode = False
TS.UsedRange.AutoFilter 2, fc
sh.UsedRange.Copy dsh.Range("A1")
dsh.AutoFilterMode = False
End Function

Qui as une idée comment le faire fonctionner?

je butte la dessus depuis un bon moment maintenant

Bonjour

A+

Bonjour,

J'ai enfin résolu ce problème, après de multitude de test, j'ai copier la feuille qui fonctionnais et j'ai remis toute les formules adéquate dedans.

Je pense que force de faire des test j'ai "bloquer" la feuille.

Mais merci pour vos conseils.