fourmi4x
XLDnaute Junior
Bonjour, et d'avance veuillez m'excuser pour la longueur de l'explication...
J'ai fait une macro qui recherchait dans une colonne un nom, le mettait dans une variable, puis recherchait une date dans la même feuille, et la mettait dans une autre variable. Classique.
Tout marchait au poil.
J'ai modifié en suite le fichier, en remplaçant les noms, qui étaient directement inscrits dans la cellule, par une formule du type =Feuil1!B15 etc.
La recherche ne marchait plus pour le nom alors j'ai modifié ma fonction find en rajoutant : ...,lookin:=xlvalues,...
Ca a marché. Mais maintenant il ne veut plus me trouver la date ! je m'arrache les cheveux dessus. Quand je fais un test en remplaçant une date de la colonne par un mot, ça marche.
voici la recherche pour le nom tout d'abord, qui marche.
Set department_case2 = ActiveSheet.Cells.Find(What:=department, after:=Cells(300, 9), LookIn:=xlValues, lookat:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlPrevious)
et voilà la recherche de la date qui marchait avant et ne marche plus maintenant, et me renvoie "nothing"... (que je mette LookIn:=xlValues ou pas)
Set wecase1 = ActiveSheet.Cells.Find(What:=CDate(todaysdate), after:=Cells(1, 1), lookat:=xlWhole, SearchOrder:=xlByColumns)
(todaysdate contient bien la date sous la forme "08/07/2007"
J'ai beau essayer plein de manipulations il ne me trouve pas la date.
Donc là je suis en grande détresse j'espère que quelqu'un pourra m'aider 🙁
Je pense que le problème se situe au niveau de l'enregistrement du "lookin:=xlvalues" qu'il doit falloir modifier mais je ne sais pas quoi mettre.
Merci à ceux qui se pencheront sur mon cas.
et bonne journée.
J'ai fait une macro qui recherchait dans une colonne un nom, le mettait dans une variable, puis recherchait une date dans la même feuille, et la mettait dans une autre variable. Classique.
Tout marchait au poil.
J'ai modifié en suite le fichier, en remplaçant les noms, qui étaient directement inscrits dans la cellule, par une formule du type =Feuil1!B15 etc.
La recherche ne marchait plus pour le nom alors j'ai modifié ma fonction find en rajoutant : ...,lookin:=xlvalues,...
Ca a marché. Mais maintenant il ne veut plus me trouver la date ! je m'arrache les cheveux dessus. Quand je fais un test en remplaçant une date de la colonne par un mot, ça marche.
voici la recherche pour le nom tout d'abord, qui marche.
Set department_case2 = ActiveSheet.Cells.Find(What:=department, after:=Cells(300, 9), LookIn:=xlValues, lookat:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlPrevious)
et voilà la recherche de la date qui marchait avant et ne marche plus maintenant, et me renvoie "nothing"... (que je mette LookIn:=xlValues ou pas)
Set wecase1 = ActiveSheet.Cells.Find(What:=CDate(todaysdate), after:=Cells(1, 1), lookat:=xlWhole, SearchOrder:=xlByColumns)
(todaysdate contient bien la date sous la forme "08/07/2007"
J'ai beau essayer plein de manipulations il ne me trouve pas la date.
Donc là je suis en grande détresse j'espère que quelqu'un pourra m'aider 🙁
Je pense que le problème se situe au niveau de l'enregistrement du "lookin:=xlvalues" qu'il doit falloir modifier mais je ne sais pas quoi mettre.
Merci à ceux qui se pencheront sur mon cas.
et bonne journée.
