XL 2021 Filtre listbox, afficher dernière ligne ajouter d'une colonne.

[Feldo]

Bonjour la communauté, j'aurais besoin de vos compétence en matière de vba..
J'ai crée un userform avec listbox puis un optionbutton pour filtrer/afficher les dernières valeurs ajouter de la colonne 5, cela fonctionne mais après filtre sa m'affiche seulement la colonne 1 et non les 5 colonnes. pourriez-vous m'aider, ci-joint un fichier exemple.

 

[patricktoulon]

pour le problème de liste vide
c'est moi qui est fait une erreur de débutant

Function Full_List()
     ListBox1.ColumnCount = 5
    ListBox1.ColumnWidths = "70;70;70;70;70"
    With Sheets("BDD"): ListBox1.List = .Range("A2:E" & .Cells(Rows.Count, "A").End(xlUp).Row).Value: End With
End Function

tu n'aura pas de liste vide même quand tu es dans la feuille d'acceuil
ca fait tellement longtemps maintenant que je ne travaille plus avec un range classique que j'en ai oublié les fondamentaux
@+