VBA Excel - Find sur des dates
Résolu/Fermé
A voir également:
- Find date vba
- Vba range avec variable ✓ - Forum VB / VBA
- Cette photo n’a pas été prise cette année. trouvez la date, l'heure et avec quel modèle d'appareil photo elle a été prise. - Forum Graphisme
- Erreur 1004 vba ✓ - Forum VB / VBA
- Publipostage date inversée ✓ - Forum Word
- Publipostage date en anglais ✓ - Forum Excel
1 réponse
J'ai trouvé une solution !
C tout bête : à mon avis une ComboBox est "formatée" en caractère, on ne peut donc pas y mettre du format date
Ce qui posait problème était ceci :
BoxMotRecherche.Value = CDate(BoxMotRecherche.Value)
Ai changé comme ceci :
Truc = CDate(BoxMotRecherche.Value)
With ActiveSheet.Range(col & "2:" & col & LastRow)
Set champ = .Find(Truc, LookIn:=xlValues, LookAt:=xlPart, SearchFormat:=False)
...
Et maintenant ça fonctionne.
Merci tout de même pour ceux qui se sont lancé dans les recherches
@NTIC
C tout bête : à mon avis une ComboBox est "formatée" en caractère, on ne peut donc pas y mettre du format date
Ce qui posait problème était ceci :
BoxMotRecherche.Value = CDate(BoxMotRecherche.Value)
Ai changé comme ceci :
Truc = CDate(BoxMotRecherche.Value)
With ActiveSheet.Range(col & "2:" & col & LastRow)
Set champ = .Find(Truc, LookIn:=xlValues, LookAt:=xlPart, SearchFormat:=False)
...
Et maintenant ça fonctionne.
Merci tout de même pour ceux qui se sont lancé dans les recherches
@NTIC