Discussion :

[italia57]

Bonjour à tous,

J'aimerais savoir s'il est possible (comme pour un filtre dans un tableau croisé dynamique) de saisir du texte dans un filtre pour effectuer une présélection.

En image, est - il possible de faire cela :



avec un segment (slicers) ?

Je vous remercie d'avance,

Vivien

[antonysansh]

Bonjour italia57,

Je ne pense pas que les Segments soient conçus pour faire ça.

Par contre voici un petit morceau de code qui te permet après saisi dans la cellule F1 de la feuille 1 de sélectionner l'ensemble des items de ton Slicer qui contienne le texte saisi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Sub test()
 
Application.ScreenUpdating = False
 
Dim Sh As Worksheet
Dim SC As SlicerCache
Dim SI As SlicerItem
 
 
Set Sh = ThisWorkbook.Sheets("Feuil1")
Set SC = Sh.Parent.SlicerCaches("Segment_prenom")
 
For Each SI In SC.SlicerItems
    If InStr(SI.Caption, Sh.[F1].Value) = 0 Then
        SI.Selected = False
    Else
        SI.Selected = True
    End If
Next
 
Application.ScreenUpdating = True
 
End Sub

Personnellement j'utilise ça pour filtrer sur un segment qui lui est synchronisé sur plusieurs TCD.

En espérant avancer ton problème

Antony

[78chris]

Bonjour

Une autre solution :

Sur 2013 tu peux utiliser les Chronologies : segments spécifiques à l'échelle du temps. Avec une chronologie sur l'année et une autre sur une autre unité, tu arrives vite à filtrer les dates.

Les chronologies peuvent, comme les segments, synchroniser plusieurs TCD.

[italia57]

Tout d'abord merci pour ta réponse, car elle peut être un bon moyen de substitution.

Par contre je ne m'y connais pas du tout en macro Excel...

Comme puis-je faire pour renseigner le code que vous m'avez donné et ensuite l'utiliser ?

Je vous remercie d'avance,

Vivien

EDIT 1: j'ai pris l'exemple des dates dans mon exemple mais moi je souhaite l'appliquer à une liste de clients contenu dans le segment

[78chris]

Bonjour

Je suppose que l'édit 1 concerne ma proposition...

Il y a une possibilité de pré-filter les longues listes mais elle nécessite l'ajout d'une colonne dans la source.

Par exemple on ajoute une formule pour l'initiale du nom situé en colonne A:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=GAUCHE(A2;1)

Puis on crée un segment sur l'initiale et un autre sur le nom : en deux clics, on arrive au nom voulu car les noms commençant par le lettre sélectionnée dans le 1er segment remontent en tête du second segment.

[italia57]

Encore merci pour votre réponse. Effectivement l'edit concerne votre réponse.

Le problème que j'ai avec cette solution c'est que ma source est un Cube SSAS, je ne peux donc pas rajouter cet élément.

Savez-vous comment mettre en place la première solution proposée ?

[antonysansh]

L'idéal est que tu consultes un des Tutos du Forum qui explique comment créer une macro ensuite tu n'auras qu'a copier / coller le code fourni.

http://silkyroad.developpez.com/VBA/DebuterMacros/

[italia57]

Merci pour ce lien.

Je viens de créer un module dans lequel j'ai copié/collé votre procédure.

Cependant, lorsque j'exécute j'ai une erreur à la ligne suivante (début de boucle) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

For Each SI In SC.SlicerItems

Erreur d'exécution '1004', Erreur définie par l'application ou pas l'objet

ça vous dit quelque chose ?

Je vous remercie d'avance,

Vivien

[78chris]

Re

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set SC = Sh.Parent.SlicerCaches("Segment_prenom")

cette ligne doit être adaptée pour le nom de ton propre segment.

Cependant, de mémoire pour les sources cube, la syntaxe est différente.

Utilise l'enregistreur de macro : clique sur une valeur puis une autre du segment, arrête l'enregistrement, regarde la syntaxe obtenue et reviens nous dire.