XL 2013 FILTRE & VBA

Jacky67

XLDnaute Barbatruc

• 30 Octobre 2017

• #2

Bonjour,
Dans le cas présent, fusionner des cellules n'est pas une bonne idée
Tester le classeur en pj

 

Pièces jointes

• 30102017.xlsx

  16.6 KB · Affichages: 51

Dernière édition: 30 Octobre 2017

Vote positif 0 Vote négatif

M

mcj1997

XLDnaute Accro

• 30 Octobre 2017

• #3

Merci pour la réponse mais cela ne fonctionne pas, si je rentre une nouvelle date ex : 02/01/2017, la semaine 1 n'apparait pas dans le filtre.

 

Vote positif 0 Vote négatif

Jacky67

XLDnaute Barbatruc

• 30 Octobre 2017

• #4

Re...
Ce classeur à pour le moins un comportement bizarre.
J'ai refait une nouvelle feuille et ce problème à disparu
Néanmoins, je te conseille de refaire un classeur tout neuf


*Pj Modifié

 

Pièces jointes

• 30102017.xlsx

  16.7 KB · Affichages: 50

Dernière édition: 30 Octobre 2017

Vote positif 0 Vote négatif

P

pilou76

XLDnaute Occasionnel

• 30 Octobre 2017

• #5

Bonjour,
La plage de ton filtre s'arrête à la ligne 11 et ne prend donc pas les lignes suivantes.

 

Vote positif 0 Vote négatif

M

mcj1997

XLDnaute Accro

• 30 Octobre 2017

• #6

Comment modifier la plage d'un filtre automatique ?

 

Vote positif 0 Vote négatif

P

pilou76

XLDnaute Occasionnel

• 31 Octobre 2017

• #7

Bonjour,
Données/Filtre avancé.
Dans ton cas, remplace E11 par E20 par ex
A vérifier mais ça fonctionne chez moi (Excel 2010)
Cordialement

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 31 Octobre 2017

• #8

Bonjour à tous

Rajoute des noms (ex: a partout) à gauche des dates pour que le filtre se mette à jour.

 

Vote positif 0 Vote négatif

Jacky67

XLDnaute Barbatruc

• 31 Octobre 2017

• #9

Re..
Tu as testé le classeur en #4 ??

 

Vote positif 0 Vote négatif

M

mcj1997

XLDnaute Accro

• 31 Octobre 2017

• #10

Jacky67 à dit:

Re..
Tu as testé le classeur en #4 ??

Cliquez pour agrandir...

oui c'est ok en #4.
Mes questions 1 et 3 sont ok, la question 2 vous inspire t-elle ?

Merci

 

Vote positif 0 Vote négatif

M

mcj1997

XLDnaute Accro

• 31 Octobre 2017

• #11

pilou76 à dit:

Bonjour,
Données/Filtre avancé.
Dans ton cas, remplace E11 par E20 par ex
A vérifier mais ça fonctionne chez moi (Excel 2010)
Cordialement
Regarde la pièce jointe 999653

Cliquez pour agrandir...

Merci pour votre réponse mais cela ne fonctionne pas, en modifiant ces zones cela supprime les filtres.

 

Vote positif 0 Vote négatif

Jacky67

XLDnaute Barbatruc

• 31 Octobre 2017

• #12

mcj1997 à dit:

oui c'est ok en #4.
Mes questions 1 et 3 sont ok, la question 2 vous inspire t-elle ?

Merci

Cliquez pour agrandir...

Re...
Pourquoi mettre la formule par vba ? La réponse est immédiate avec la formule en E3

 

Vote positif 0 Vote négatif

M

mcj1997

XLDnaute Accro

• 31 Octobre 2017

• #13

Jacky67 à dit:

Re...
Pourquoi mettre la formule par vba ? La réponse est immédiate avec la formule en E3

Cliquez pour agrandir...

Je souhaite faire disparaître les formules avant de circulariser ce fichier.

 

Vote positif 0 Vote négatif

Jacky67

XLDnaute Barbatruc

• 1 Novembre 2017

• #14

mcj1997 à dit:

Je souhaite faire disparaître les formules avant de circulariser ce fichier.

Cliquez pour agrandir...

Re.
Place ceci dans le module de la feuille en question
Eventuellement adapter la plage

Code:

Private Sub Worksheet_Calculate()
[e3] = [SUBTOTAL(103,e6:e5000)]
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
With Application: .ScreenUpdating = False: .Calculation = xlManual: .EnableEvents = False: End With
If Target.Column = 5 And Target.Row > 5 Then [e3] = [SUBTOTAL(103,e6:e5000)]
With Application: .EnableEvents = True: .Calculation = xlAutomatic: .ScreenUpdating = True: End With
End Sub

 

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 1 Novembre 2017

• #15

Bonjour à tous,

Un autre essai qui utilise une fonction personnalisée LigAff(xplage As Range).
Cette fonction renvoie un tableau dont chaque élément i est égal :

• à 1 si la i ème ligne de la xplage est visible
• à 0 si la i ème ligne de la xplage est masquée

Ce tableau est un tableau est en "colonne". xplage doit être une plage de cellules contiguës. Cela fonctionne aussi s'il n'y qu'une cellule dans xplage.

Cette fonction est utilisable dans une expression de type SOMMEPROD ==> voir cellules C3 et E3.

Dans le tableau, les cellules fusionnées ont été "dé-fusionnées". Les cellules vides ont été "re-vidées".
Le filtre a été appliqué sur la zone A5:E30.

 

Pièces jointes

• mcj1997- 30102017- v1.xlsm

  19.5 KB · Affichages: 40

Dernière édition: 1 Novembre 2017

Vote positif 0 Vote négatif