XL 2013 Filtrer sur des onglets du classeur

[pierre811517]

Bonjour,

J'ai plusieurs onglets dans mon classeur dans lesquels il y a des tableaux d'indicateurs.
Je souhaiterais créer un onglet "paramètres" avec les critères suivants par exemples:

1. période
2. département sélectionné
3. etc

et que tous ces critères sélectionnés s'appliquent à plusieurs onglets de mon classeur automatiquement.

Existe-t-il une solution ?

par avance, merci,

bien cordialement,

Pierre.

 

[sylvanu]

Bonjour Pierre,
Sans un petit fichier test, très brumeux comme demande. 🙂
Si vous avez un onglet "paramètres" avec en A2 par exemple la période, dans une feuille quelconque vous pouvez faire :

=Paramètres!A2

et sa valeur sera toujours ré évaluée.
On encore vous nommez la cellule paramètres A2, par exemple : Période, et dans une feuille vous faites :

=Période

et sa valeur sera toujours ré évaluée. C'est plus parlant dans les formules d'avoir un nom plutôt qu'une référence à une cellule.

 

[pierre811517]

Bonjour Pierre,
Sans un petit fichier test, très brumeux comme demande. 🙂
Si vous avez un onglet "paramètres" avec en A2 par exemple la période, dans une feuille quelconque vous pouvez faire :

=Paramètres!A2

et sa valeur sera toujours ré évaluée.
On encore vous nommez la cellule paramètres A2, par exemple : Période, et dans une feuille vous faites :

=Période

et sa valeur sera toujours ré évaluée. C'est plus parlant dans les formules d'avoir un nom plutôt qu'une référence à une cellule.

Merci,
vous trouverez en PJ, un exemple avec:
onglet "parametre": saisir les paramètres
onglet "reg": doit être mis à jour en fonction des paramètres sélectionnés
onglet "dpt": doit être mis à jour en fonction des paramètres sélectionnés

Merci pour vos efforts sur le sujet,

bien cdt,

Pierre

 

[chris]

Bonjour à tous

Cela nécessite de programmer le filtre en VBA d'autant qu'il n'y a pas de titres communs sur tes 2 onglets mais une dépendance Département Destinataire avec dpt
et tu sembles évoquer d'autres onglets...

 

[sylvanu]

Bonjour Pierre, Chris,
Un essai , avec ce que j'ai compris, avec deux macros événementielles qui s'exécutent automatiquement lorsqu'on sélectionne une feuille :

Sub Worksheet_Activate()
    Application.ScreenUpdating = False
    Columns("A:D").AutoFilter
    If Sheets("paramètre").[C6] <> "" Then _
        ActiveSheet.Range("$A$1:$D$931").AutoFilter Field:=3, Criteria1:=Sheets("paramètre").[C6]
    If Sheets("paramètre").[C7] <> "" Then _
        ActiveSheet.Range("$A$1:$D$931").AutoFilter Field:=1, Criteria1:=Sheets("paramètre").[C7]
    If Sheets("paramètre").[C8] <> "" Then _
        ActiveSheet.Range("$A$1:$D$931").AutoFilter Field:=2, Criteria1:=Sheets("paramètre").[C8]
End Sub

et

Sub Worksheet_Activate()
    Application.ScreenUpdating = False
    Columns("A:C").AutoFilter
    If Sheets("paramètre").[C6] <> "" Then _
        ActiveSheet.Range("$A$1:$D$931").AutoFilter Field:=1, Criteria1:=Sheets("paramètre").[C6]
    If Sheets("paramètre").[C9] <> "" Then _
        ActiveSheet.Range("$A$1:$D$931").AutoFilter Field:=2, Criteria1:=Sheets("paramètre").[C9]
End Sub