VBA Excel - Find sur des dates
Résolu/Fermé
A voir également:
- Find date vba
- Find grep ✓ - Forum Linux / Unix
- Vba range avec variable ✓ - Forum VB / VBA
- Publipostage date en anglais ✓ - Forum Excel
- Publipostage date inversée ✓ - Forum Word
- Erreur 1004 vba ✓ - Forum VB / VBA
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