Hallo,
folgender VBA-Code liegt zu Grunde
ActiveSheet.PivotTables("PivotTable1").PivotFields("Nummer").CurrentPage _
= "71004"
Momentan habe ich 200 Schleifen erstellt, in der jedes mal die Nummer (71004) geändert wird. Das Ganze ließe sich natürlich verbessern, wenn ich die Nummern in einem weiteren Datenblatt speichern könnte und Excel solange eine Schleife fährt, bis ein leeres Feld (=Ende der Nummernliste) entdeckt. Gibt es da eine Möglichkeit, dies in einer PivotTabelle umzusetzen?
Vielen Dank schonmal!
Gruß
Thomas
|