Trouver le debut et la fin d'une plage

Bonjour,

Comment déterminer le debut et la fin de la plage ou Valeur est égal
à 14 ?


Valeur Date
13 31/03/2006
14 01/04/2006
14 02/04/2006
14 03/04/2006
14 04/04/2006
14 05/04/2006
14 06/04/2006
14 07/04/2006
15 08/04/2006


'------------------------------------------------
Sub TrouvePlg(Valeur As Integer);
Dim Debut, Fin
Debut = ???
Fin = ???
MsgBox 'Votre Plage commence à la date : ' & Debut & ', et se termine
à la date : '& Fin
End Sub
'----------------------------------------------


Merci d'avance.
Merci.