Filtre selon date en cours Résolu/Fermé

Question

Bonjour à toute la communauté, 

Avant tout sincèrement tous mes bons voeux pour 2014 !
J'envoie ces bons voeux également au forum à qui je souhaite longue vie, j'espère pouvoir y trouver comme en 2013 toute la science que j'ai pu y puiser depuis 1 an et qui m'a permis de faire des progrès considérables.

Voici ma question :
J'ai un fichier XLSM dans lequel j'utilise beaucoup les filtres sur les colonnes. Je suis amené à sélectionner des filtres différents de nombreuses fois à chaque fois que j'ouvre mon fichier, c'est pourquoi je cherche à simplifier cela au travers d'une macro :

Il s'agit d'afficher une boîte de dialogue proposant les champs possibles dans une colonne particulière : celle du mois en cours.
Autrement dit, la macro doit récupérer le mois de la date du jour, en déduire sur quelle colonne il doit filtrer, et proposer les réponses possibles pour filtrer.

Avec un fichier ce sera plus facile : 	https://www.cjoint.com/c/DAbu1nPJzqc 

Je vous remercie par avance de vous pencher sur mon problème.


Configuration: Windows 7 / Excel 2010 / Firefox 26.0

gbinforme · Answer

Bonjour touroul,
 
D'abord,  tous mes voeux pour 2014 pour toi et ta famille ! 

Avec cette formule que tu devrais reconnaitre cela devrait faire ta fonctionnalité :

https://www.cjoint.com/?DAcaCO5oi4S

Tu peux directement "tirer" le formulaire dans ton vrai classeur ainsi que le module.

touroul · Answer

Salut Gbinforme

Ouaouh ! Ta macro est magnifique.
Me suis réveillé tôt ce matin, je devais sentir que tu avais répondu ...
Je suis dessus depuis le lever, j'essaie de l'adapter à mon fichier original, mais j'ai quelques bugs dûs au fait que le Combobox affiche les contenus de toutes les colonnes en vrac.
Pour l'instant j'essaie de résoudre le problème seul, je reviendrai vers toi si je n'y parviens pas. En tout cas c'est magnifique et devrait bien me simplifier la vie quand ce sera fini.
Joli bout de code, tu as du y passer du temps !
Faut que j'aille bosser mais je m'y remets dès que j'ai un moment.
Une fois de plus un grand merci à toi ...

foo · Answer

Bonjour

Bonne année a toi

Voici un UserForm avec une Lisbox

http://cjoint.com/?3AclpCBS8l8

A+

Maurice

eriiic · Answer

Bonjour tout le monde,
Salut gb,

tu as oublié de d'ajuster le range ici après tes tests :
Private Sub ComboBox1_Click()
    ActiveSheet.Range("$A$3:$L$7").AutoFilter ...

Ah, il était bien caché le ComboBox1, tu m'as fait cherché ;-)
Plus qu'à me rappeler de cette technique pour cacher la zone de saisie...

eric

gbinforme · Answer

Bonjour,

Effectivement, ton problème n'est pas le même qu'hier et comme c'était tard, le range était resté le tien et en fait il ne faut pas le dimensionner ainsi.

https://www.cjoint.com/?DAcqjJOehle

Ainsi la structure du classeur peut être modifiée sans changer la macro.
 
@ Éric : tu vois que tu n'as plus qu'à regarder le vieux poste que je t'ai signalé, car nous avons les mêmes intervenants ;-)

foo · Answer

Bonjour

Voila la Modif ListBox

http://www.cjoint.com/?3AcsHXRd7hj


A+
Maurice

Filtre selon date en cours

6 réponses

Discussions similaires