3 pièce(s) jointe(s)
RANGE.FIND ne fonctionne pas pour une DATE
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
Pièce jointe 511811
Le format des dates est le suivant
Pièce jointe 511814
Enfin le code suivant dans un un module:
Code:
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
Pièce jointe 511834
Même chose si utilise
Merci par avance pour toute aide !