Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1612to1616
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Pivot Filter setzten (Wert nicht Zähler)

Pivot Filter setzten (Wert nicht Zähler)
04.03.2018 16:12:48
Tim
Hallo Zusammen,
Das Filtern einer Pivot treibt mich in den Wahnsinn
Wie bekomme ich es hin, dass er nach dem "Wert" Filtert und nicht die Xte Position nimmt?
z.B Beispiel
So ist es richtig, hier nimmt er den Wert "10"

With Application.Workbooks(AktionsplanDatei).Sheets("Pivot1").PivotTables(" _
PivotTable1").PivotFields("KW")
.PivotItems("10").Visible = True
End With

Setze ich jedoch eine Variable ein:

intKW = "10" 'diese wird später automatisch ermittelt
Filialen").PivotTables("PivotTable1").PivotFields("KW")
.PivotItems(intKW).Visible = True
End With

Bei Letzterem wählt der Filter die 10. Position im Filter aber nicht den Wert "10"
Zufällig jemand eine Idee?
Gruß Tim

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pivot Filter setzten (Wert nicht Zähler)
04.03.2018 16:34:01
Luschi
Hallo Tim,
da intKW sicher so dimensioniert wurde: Dim intKW As Intger
bleibt der Datentyp von intKW bei Integer, auch wenn man im eine Textzahl zuweist:
intKW = "10"
varType(intKW) ergibt 2 (also Integer=
deshalb so:
intKWS = 10 und PivotItems(CStr(intKW)).Visible = True
oder Dim strKW As String
strKW = "10" und PivotItems(strKW).Visible = True
Gruß von Luschi
aus klein-Paris
AW: Pivot Filter setzten (Wert nicht Zähler)
04.03.2018 18:09:07
Tim
ahh Klasse, mein Retter, vielen Dank.
Ich habe fast vermutet, dass die Antwort so simpel ist.
Schönen Sonntag noch
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige