Discussion :

[informer]

Bonjour à tous,

Je sais que ce problème est récurrent mais malgré la lecture de nombreux posts, je n’arrive pas à résoudre la recherche avec FIND sur une date.

J'ai les lignes suivantes



Le format des dates est le suivant



Enfin le code suivant dans un un module:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
dim dDate as date
dDate = Format(Now(), "mm/dd/yyyy")
Set oRgFind = oShtGraphe.Range(3).EntireRow.Find(What:=dDate, LookIn:=xlFormulas, SearchOrder:=xlByRows)

Cela génère l'erreur suivante



Même chose si utilise

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

LookIn:=xlValues

Merci par avance pour toute aide !