Problème d'ajouts de références dans une base de données (VBA Excel)

Pas de quoi.

Si tu as un souci, normalement ce code est censé être évolutif. Donc n'hésite pas, je serais de retour dans une semaine...

A++

Effectivement le code est évolutif, j'ai déjà envie de l'améliorer.
Je sais que tu reviens d'ici une semaine mais on sait jamais ahah

Du coup j'ai rajouté une combobox2 pour refaire un tri sur les résultats présent dans la listebox avec les même propriétés présente dans la combobox1pour le moment afin de tester tout ce petit monde et c'est tout bon.

J'aurai en plus aimé voir le nombre d'item trouvé, j'ai donc ajouter un label censé les compter mais j'ai un souci :

Private Sub UserForm_Initialize()
Dim Tbl()
Me.ListBox2.List = Tbl
Me.Label1.Caption = "Nombre d'item trouvé : " & UBound(Tb1) + 1

Il me renvoie une erreur sur mon recherche.show vbModeless de la feuille 1.

Cordialement