Macro excel appel segment

Fermé
Fabien - 19 juin 2012 à 12:28
 roupine - 8 mars 2017 à 16:11
Bonjour,
J'essai de réaliser une macro pour récupérer la valeur d'un segment excel (slicer en anglais filtre élaboré pour les TCD)


Je souhaire récupérer dans une case A1 par exemple la valeur du segment.
Aparament la fonction serait .SlicerCache
Je ne connais pas la synthaxe exacte, comment récupérer cette valeur dans une feuille intitulé Population pour un segment (slicer) intitulé segment_region1.
J'ai testé quelque chose de ce genre mais ça ne marche pas.

Dim valeur as string
valeur=ActiveWorkbook.sheet("population").Slicer("segment_region1).SlicerCache


Désolé pour la pauvreté de ce code mais je suis débutant en VBA
Pouvez vous m'aider?

1 réponse

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
19 juin 2012 à 13:16
Salut,

L'aide VBA de Microsoft, en ligne, nous donne ceci.

Le SlicerCache possède une propriété Name, peut être essayer de ce côté là.

Dim valeur as string
valeur = ActiveWorkbook.sheet("population").Slicer("segment_region1).SlicerCache.Name

0
A essayer :

"Sub test()

Dim var As String
Dim i As Integer, x As Integer

x = ActiveWorkbook.SlicerCaches("nom segment").SlicerCacheLevels.Count

For i = 1 To x
If ActiveWorkbook.SlicerCaches("nom segment")..SlicerItems(i).Selected = True Then
var = ActiveWorkbook.SlicerCaches("nom segment").).SlicerItems.Item(i).Caption
End If
Next

range("A1").Value = var

End Sub"
0