ich würde gerne in einem Diagramm über VBA die Reihen und Rubriken aktivieren und deaktivieren, wie dies über Excel über Daten auswählen und den Checkboxen möglich ist.
Welches Objekt ist dies?
Vielen Dank.
ActiveChart.FullSeriesCollection(2).IsFiltered = True
oder
Private Sub Test()
Dim cht As Chart
Dim ser As Series
'Retrieve our chart and seriescollection objects'
Set cht = Worksheets("Sheet1").ChartObjects("Chart 1").Chart
Set ser = cht.SeriesCollection(1)
'Set the first series line to be hidden'
With ser.Format.Line
If .Visible = msoTrue Then
.Visible = msoFalse
ser.Name = vbNullString
Else
.Visible = msoTrue
ser.Name = "Series 1"
End If
End With
End Sub
cuDim chr As Chart
Dim chrgrp As ChartGroup
Dim cat As CategoryCollection
Dim lngZaehler As Long
Set chr = ActiveSheet.ChartObjects(1).Chart
For Each chrgrp In chr.ChartGroups
Set cat = chrgrp.CategoryCollection()
For lngZaehler = cat.Count To 1 Step -1
' die ersten 2 Werte ausblenden
If lngZaehler
aber man bekommt sie nicht wieder eingeblendet, da sie in der CategoryCollection nicht mehr existieren.ActiveChart.ChartGroups(1).FullCategoryCollection(1).IsFiltered = False
cu