Bonjour à tous et à toutes,
Ce post est plus une demande d'explication .
Il semble que la méthode Find considère les dates comme des formules et non des valeurs.
Par exemple :
Sub Macro1 ()
Dim Trouve As Date
Trouve = "23:50"
' Avec cette ligne la date est trouvée à condition qu'il n'y ai pas eu auparavant une recherche Find avec 'paramètre LookIn:=xlValues sinon erreur d'exécution 91 et il faut refermer et ré ouvrir le classeur pour
'que la date soit trouvée
[E:E].Find(What:=Trouve, LookAt:=xlWhole).Select
' Avec cette ligne erreur d'exécution 91
[E:E].Find(What:=Trouve, LookIn:=xlValues, LookAt:=xlWhole).Select
' Avec cette ligne la date est trouvée à chaque fois
[E:E].Find(What:=Trouve, LookIn:=xlFormulas, LookAt:=xlWhole).Select
End Sub
J'ai vu sur Internet que le paramètre LookIn est facultatif, ce n'est donc pas forcément vrai.
Y a-t-il un moyen de faire "oublier" à Excel (ou plutôt réinitialiser Excel) qu'il y a eu une recherche Find avec paramètre LookIn:=xlValues
Merci à ceux et celles qui voudront bien éclairer ma lanterne.
Bonne soirée.
Ce post est plus une demande d'explication .
Il semble que la méthode Find considère les dates comme des formules et non des valeurs.
Par exemple :
Sub Macro1 ()
Dim Trouve As Date
Trouve = "23:50"
' Avec cette ligne la date est trouvée à condition qu'il n'y ai pas eu auparavant une recherche Find avec 'paramètre LookIn:=xlValues sinon erreur d'exécution 91 et il faut refermer et ré ouvrir le classeur pour
'que la date soit trouvée
[E:E].Find(What:=Trouve, LookAt:=xlWhole).Select
' Avec cette ligne erreur d'exécution 91
[E:E].Find(What:=Trouve, LookIn:=xlValues, LookAt:=xlWhole).Select
' Avec cette ligne la date est trouvée à chaque fois
[E:E].Find(What:=Trouve, LookIn:=xlFormulas, LookAt:=xlWhole).Select
End Sub
J'ai vu sur Internet que le paramètre LookIn est facultatif, ce n'est donc pas forcément vrai.
Y a-t-il un moyen de faire "oublier" à Excel (ou plutôt réinitialiser Excel) qu'il y a eu une recherche Find avec paramètre LookIn:=xlValues
Merci à ceux et celles qui voudront bien éclairer ma lanterne.
Bonne soirée.