Programme VBA pour réaliser un filtre
Résolu
benjamin
-
benjamin -
benjamin -
Bonsoir les amis!!
Je sollicite votre indulgence pour m'assister à surmonter une difficulté auquelle je suis confronté pour la réalisation d'un programme VBA me permettant d'effectuer une opération de filtre.
Je vous envoie le classeur de données que j'utilise.
Dans ce classeur, je veux réaliser un filtre sur la colonne E de sorte à afficher que les éléments dont la valeur prise par la colonne E est 1.
Voici ce que j'ai fais
Cette commande fonctionne comme je l'ai écrite. Mais, étant données qu'il y a des lignes en gras (représentant des totaux) dans la colonne G, je veux que ces lignes apparaissent quelque soit le critère de filtre choisi. En plus, pour chaque totale, les valeurs prises par la colonne ANNEE 2006 doivent changer à causes formules.
Par exemple, si le critère de filtre est 1, la valeur ANNEE 2006 de la ligne TOTAL ne doit plus être 31279
Celle de la ligne Agriculture doit être différente de 5058
Comment faire ? Aide moi s'il te plait. Je compte vraiment sur toi,
Le document est disponible sur le site suivant:
http://www.cjoint.com/?DAFrfkr8jKO
le classeur a pour nom: ann_leg_.xlsx
Merci d'avance
Je sollicite votre indulgence pour m'assister à surmonter une difficulté auquelle je suis confronté pour la réalisation d'un programme VBA me permettant d'effectuer une opération de filtre.
Je vous envoie le classeur de données que j'utilise.
Dans ce classeur, je veux réaliser un filtre sur la colonne E de sorte à afficher que les éléments dont la valeur prise par la colonne E est 1.
Voici ce que j'ai fais
Sub Filtrer ()
Workbooks("ANN_LEG.xlsx").Worksheets("données").Range("A1").AutoFilter _
field:=5, _
Criteria1:="1", _
VisibleDropDown:=False
End Sub
Cette commande fonctionne comme je l'ai écrite. Mais, étant données qu'il y a des lignes en gras (représentant des totaux) dans la colonne G, je veux que ces lignes apparaissent quelque soit le critère de filtre choisi. En plus, pour chaque totale, les valeurs prises par la colonne ANNEE 2006 doivent changer à causes formules.
Par exemple, si le critère de filtre est 1, la valeur ANNEE 2006 de la ligne TOTAL ne doit plus être 31279
Celle de la ligne Agriculture doit être différente de 5058
Comment faire ? Aide moi s'il te plait. Je compte vraiment sur toi,
Le document est disponible sur le site suivant:
http://www.cjoint.com/?DAFrfkr8jKO
le classeur a pour nom: ann_leg_.xlsx
Merci d'avance
9 réponses
-
Bonjour,
Il faudrait plutot vous orienter vers un Tableau Croise Dynamic, ce serait beaucoup plus simple et pas besoin de VBA. -
Merci,
S'il te plait, permet moi d'éclairer ma lanterne!
N'existe t-il pas un programme VBA pour effectuer ce Tableau croisé dynamique?
S'il en existe, aide moi a effectuer le filtre suivant le critère que la valeur prise par la colonne E est 1.
Merci -
Bonjour,
En regardant de plus pres vos donnees, meme un tableau croise dynamique n'est pas jouable a cause de vos totaux (genre Agriculture formel) qui n'ont pas de logique. Avec du VBA c'est faisable, mais bonjour pour vos ToTaux en fonction des lignes visibles ou non -
S'il te plait que veux tu dire par mais bonjour pour vos ToTaux en fonction des lignes visibles ou non?
Si j'ai bien compris , je pense que ces totaux ont des logiques puisqu'il existe des formules permettant de les obtenir.
Cordialement, -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Bonjour,
Je veux bien vous faire un fichier, avez vous des connaissances en VBA excel ????? -
Bjr,
J'ai des connaissances en VBA-excel
C'est à ce propos que je parlais.
Un programme VBA me permettant de réaliser cette tache.
Je serais très ravis d'avoir ce fichier!!
Cordialement, -
Re,
C'est en cours
A+ -
Re,
une facon de faire, j'ai laisse les formules pour les lignes ou les cellules a additionner ou soustraire ne sont jamais masquees
a tester
https://www.cjoint.com/?DBgpNIATFtM
A+ -
