MS-Office-Forum

Zurück   MS-Office-Forum > Microsoft Office > Microsoft Excel
Registrieren Forum Hilfe Alle Foren als gelesen markieren

Banner und Co.

Antworten
Ads
Themen-Optionen Ansicht
Alt 10.04.2019, 21:33   #1
Jörg123
Neuer Benutzer
Neuer Benutzer
Standard Frage - VBA: Einzelne Einträge im Slicer deaktivieren (Datenmodell)

Hallo Forum,

ich habe einen VBA Code, mit dem ich in einem Slicer einzelne Einträge deaktivieren kann.
Wenn allerdings die Daten bei der Pivoterstellung gleichzeitig ins Datenmodell geladen wurden bekomme ich beim Makro abspielen einen Laufzeitfehler...?
Wie muss der Code angepasst werden, damit er auch in Verbindung mit dem Datenmodell funktioniert?

Besten Dank im Voraus,
ciao Jörg

Sub Test()
ActiveWorkbook.SlicerCaches("Datenschnitt_Buchstabe").ClearManualFilter
With ActiveWorkbook.SlicerCaches("Datenschnitt_Buchstabe")
.SlicerItems("a").Selected = False
.SlicerItems("b").Selected = False
End With
End Sub
Angehängte Dateien
Dateityp: xlsm Slicer mit Datenmodell.xlsm (86,3 KB, 7x aufgerufen)
Jörg123 ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 14.04.2019, 21:09   #2
Trotio
Neuer Benutzer
Neuer Benutzer
Standard

Hallo Jörg,

Hast du es schon mit dem aufzeichnen eines Makros probiert?

Ich komme auf folgendes Ergebnis, wenn ich a nicht anzeigen lassen möchte



LG
Trotio


Sub Makro1()
'
' Makro1 Makro
'

'

ActiveSheet.PivotTables("PivotTable1").PivotFields( _
"[Bereich].[Buchstabe].[Buchstabe]").VisibleItemsList = Array( _
"[Bereich].[Buchstabe].&[b]", "[Bereich].[Buchstabe].&[c]", _
"[Bereich].[Buchstabe].&[d]", "[Bereich].[Buchstabe].&[e]", _
"[Bereich].[Buchstabe].&[f]", "[Bereich].[Buchstabe].&[g]")
End Sub
Trotio ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 15.04.2019, 08:40   #3
Jörg123
Threadstarter Threadstarter
Neuer Benutzer
Neuer Benutzer
Standard Thema weiterhin offen

Hallo Trotio,

ja, habe ich - aber hier selektierst Du alles außer die, die Du nicht möchtest.
Die Aufgabenstellung lautet aber deselektieren von einzelnen Ausprägungen.

Das Problem dabei ist:
a) Die eigentliche Liste bei mir ist viel zu lang, der Makrorekorder steigt aus
b) das ganze soll möglichst flexibel sein, d.h. ich kann immer nur sagen, was nicht angezeigt werden soll und der Rest soll angezeigt werden.

Danke aber für den Versuch
Ciao Jörg
Jörg123 ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Ads
Antworten


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)
 
Themen-Optionen
Ansicht

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge anzufügen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

vB Code ist An.
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist An.
Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:11 Uhr.



Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.

Copyright ©2000-2018 MS-Office-Forum. Alle Rechte vorbehalten.
Copyright ©Design: Manuela Kulpa ©Rechte: Günter Kramer
Eine Verwendung der Inhalte in anderen Publikationen, auch auszugsweise,
ist ohne ausdrückliche Zustimmung der Autoren nicht gestattet.