Utiliser Match avec une date

Bonjour à tous,

Comme indiqué dans le titre, j'essaie de récupérer la position relative d'une date dans un de mes tableaux/ListObject..

J'ai cherché un peu sur internet et j'ai trouvé 2 trucs que j'ai testé mais que je n'ai pas réussi à faire fonctionné :/

Le premier, venant de ce site a proposé ceci:

Code:

---

1 2	Ligne = WorksheetFunction.Match(CLng(YItem.ListSubItems(2).Value), _ TblIntAgent.ListColumns("Date").DataBodyRange.SpecialCells(xlCellTypeVisible), 0)

---

Qui n'a malheureusement pas fonctionné.

Ce site a proposé ceci:

Code:

---

1 2	Ligne = TblIntAgent.ListColumns("Date").DataBodyRange.SpecialCells(xlCellTypeVisible). _ Find(CDate(YItem.ListSubItems(2).Value), , , xlWhole).Row - TblIntAgent.DataBodyRange.Row + 1

---

Mais que je n'ai pas non plus sur faire fonctionner ...


Quelqu'un aurait-il une idée ?


je vous remercie d'avance :-D

Au cas où certain cherche la solution je l'ai !


Ma date dans mon ListView était en format texte... j'ai du donc le convertir en format date avant ... Voici la solution:

Code:

---

1 2	Ligne = WorksheetFunction.Match(CLng(DateValue(YItem.ListSubItems(2))), _ TblIntAgent.ListColumns("Date").DataBodyRange.SpecialCells(xlCellTypeVisible), 0)

---

Bonne journée à vous !