über eine Schaltfläche (Button) sollen diese zwei Makros (Erweiterung und Reduzierung eines PivotTable-Felds) ausgeführt werden:
Makro 1:
Sub erweitern()
ActiveSheet.PivotTables("PivotTable1").PivotFields("Feld1").ShowDetail = True
ActiveSheet.PivotTables("PivotTable1").PivotFields("Feld2").ShowDetail = True
End Sub
Makro 2:Sub reduzieren()
ActiveSheet.PivotTables("PivotTable1").PivotFields("Feld2").ShowDetail = False
ActiveSheet.PivotTables("PivotTable1").PivotFields("Feld1").ShowDetail = False
End Sub
Wie führe ich die beiden Makros zusammen, damit diese abwechseln ausgeführt werden?
Hab versucht hier abzugucken, aber leider ohne Erfolg:
https://www.herber.de/forum/archiv/628to632/629621_Button_mehrere_Makros_zuweisen.html
http://www.office-loesung.de/ftopic600706_0_0_asc.php
Viele Grüße
Kisska