Filtrer un tableau depuis inputbox

Bonjour à tous,

Je me permets de solliciter votre aide car j'ignore s'il est possible et comment faire pour filtrer un tableau depuis un inputbox.
En faite, j'ai un tableau avec une colonne qui contient uniquement des dates et d'autres colonnes avec des informations relatives à la date.
J'aimerai faire un bouton relié à un inputbox qui permette à l'utilisateur de saisir une date et de ne faire apparaître que la ligne du tableau concernant cette date...

Merci par avance pour votre aide!

Bonjour,

Une solution possible

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub FiltrerLeTableau()   Dim DateCherchee As Variant   With ActiveSheet If .FilterMode = True Then .ShowAllData DateCherchee = InputBox("Entrez une date", "Filtrer le tableau", "00/00/0000") If IsDate(DateCherchee) = True Then .Range("Tableau").AutoFilter Field:=1, Operator:=xlFilterValues, Criteria1:=Array(2, CDate(DateCherchee)) End With   End Sub

---

Cordialement.

Bonjour,

Merci pour ta réponse! Je viens d'essayer ton code mais il me trouve aucun résultat quand je saisie une date qui est pourtant valide :/

Avez-vous essayé sur le fichier joint ?

Sinon, il faudrait mettre une copie de votre fichier en ligne sans données confidentielles pour vérifier votre code.

Cordialement.

Oui j'ai essayé sur le fichier joint :) mais je viens de trouver pourquoi cela ne fonctionnait pas! ma colonne était en format personnalisé, je l'ai mise en format date et cela fonctionne :D Merci beaucoup !

Bonsoir,

Excuse moi de relancer la discussion, je viens de découvrir un problème ^^ la macro fonctionne super bien sur excel 2014 mais ce matin j'ai essayé de l'utiliser sur un pc qui a excel 2007 et elle ne veut pas fonctionner enfin elle semble fonctionner mais elle n'affiche jamais aucun résultat, elle filtre tout...

J'ai passé ma journée à essayer de comprendre pourquoi elle ne fonctionne pas sur 2007, en vain! Aurais-tu une idée ? :)

Bonsoir,

Avec un extrait de votre fichier contenant la macro, je peux regarder.

Nb : Je suis équipé d'Excel 2010.

Cordialement.