Rechercher une date précise dans Excel Fermé

Question

Bonjour, 
Je voudrais faire une recherche sur une date précise d'une colonne d'un tableau excel(2003).
Dans cette colonne j'ai utilisé le format jj/mm/aaaa.
J'ai fait une macro, trés simple, car je ne sais pas faire plus, avec l'assistant :
           Range ("M13").Select
           Sheets("données").Select
           Selection.Autofilter Fiel:=12, Criterial:="14/12/2013"
Lorsque je la lance je n'ai pas de résultat, alors que j'ai bien des dates qui correspondent.
Est-ce que vous pourriez me dire comment faire pour résoudre ce problème d'une part.

D'autre part, avec cette méthode que j'utilise par ailleurs pour rechercher une chaine de caractère, et qui fonctionne bien, comment faire pour éviter d'aller chaque fois dans VBA pour mettre la nouvelle chaine.

D'avance, je vous remercie
Trés cordialement
Robert de Limoges

Configuration: Windows 7 / Internet Explorer 9.0

michel_m · Answer

Bonjour

tes dates doivent saisies au format date (sans guillemets aautour)

Option Explicit

Sub chercher_date()
Dim Jour As Date, Cellule As Range, Rep As Byte

On Error GoTo erreur
1   Jour = InputBox("entrer la date au format jj/mmmm/aaaa)")
    Set Cellule = Columns("M").Find(Jour, Range("M13"))
    Cellule.Select
Exit Sub

erreur:
    Rep = MsgBox("erreur de saisie", vbRetryCancel + vbExclamation)
    If Rep = vbRetry Then Resume 1

End Sub

Rechercher une date précise dans Excel

1 réponse

Discussions similaires