Recherche de dates seulement avec lannee

j'ai une macro qui selon la date que je saisi me la trouve sur mon classeur ,

cependant il s'agit d'une date précise , je voudrais que seulement avec l'année on me présélectionne toutes les dates correspondantes

Pourriez-vous m'aidez ? merciii

voici le code de la macro qui me présélectionne la date précise

voici le code de la macro :

Sub date_2()

Dim X As Date

Dim Cel As Range

X = CDate(InputBox("date"))

Set Cel = Sheets("Feuil1").UsedRange.Find(X)

Cel.Select

End Sub

Bonjour,

sans voir de fichier c'est un peut compliquer je pense..

mais tu peux essayer ce code :

Sub date_2()
Dim X as variant
Dim Cel As Range
X = InputBox("date")
Set Cel = Sheets("Feuil1").UsedRange.Find(X, lookat:=xlPart)
Cel.Select
End Sub

J'ai juste changé le type de X que j'ai passé de Date à Variant. Comme cela tu devrait pouvoir chercher autre chose que des dates ...

dis moi si ça te convient,

RemBabar

Bonjour Rembabar ,

merci pour ta réponse rapide , le code que tu m'a transmis marche bien

seulement en saisissant l'année mais il me présélectionne qu'une seule date de l'année en question (la première) et non toutes les dates correspondantes

mercii !!