Wel in Excel 2013, niet in Excel 2010

[jbronzwaer]

Beste Excel en vba specialisten,
Onderstaande macro zorgt ervoor dat de "total" kolom in de grafiek kan worden in- of uitgeschakeld.
Deze routine werkt perfect in Excel 2013.
In Excel 2010 treedt echter een foutmelding op in de 4e regel.
Wie heeft voor mij de juiste code, die dit wel zonder foutmelding uitvoert in Excel 2010 ?

Sub chart_total_hide()
    ActiveSheet.ChartObjects("chart_1").Activate
    ActiveChart.Legend.Select
    [B]With ActiveChart.ChartGroups(1).FullCategoryCollection(1)	' error in excel 2010[/B]
             If .Name = "total" Then .IsFiltered = Not .IsFiltered
    End With
End Sub

 

[sylvester-ponte]

met voorbeeldbestandje is het makkelijker te onderzoeken

 

[edmoor]

En als je zegt een foutmelding te krijgen is het wel zo handig deze er ook bij te vermelden. We zien het vaak hier: "Ik krijg een fout. Wat moet ik doen?"
Die foutmeldingen zijn er maar een stuk of 10.000 van ofzo en die zijn er niet alleen om de gebruiker te pesten. Ze geven stuk voor stuk aan wat er aan de hand is. Ik vind het onbegrijpelijk dat deze er zo vaak niet bij wordt verteld.

 

[jbronzwaer]

Hr.

Mijn excuus.

Foutmelding:
Fout 438 tijdens uitvoering
Deze eigenschap of methode wordt niet ondersteund door dit object.

Ik achtte het niet noodzakelijk het foutnummer te vermelden omdat de code in 2013 perfect werkt en dus geen fouten bevat.
Wat is er echter aan de hand:
In Excel 2013 is het mogelijk om categorie-items aan- of uit te vinken in de gegevensselectie van de grafiek. In Excel 2010 is dat nog niet mogelijk.
Ik moet de applicatie echter in Excel 2010 kunnen gebruiken.
Daarom ben ik op zoek naar een andere manier van programmeren om toch een item van de categorie (x-as) te kunnen uitschakelen (verbergen)

Bijgevoegd een voorbeeldbestandje
Bekijk bijlage Probleem_grafiek.xlsm

met vriendelijke groet,
Jan B.

 

[edmoor]

Was overigens niks persoonlijks
Ik zal er straks eens naar kijken, tenzij iemand anders me voor is.

 

[sylvester-ponte]

ik weet iet wat er gebeurt als je totaal uit zet,
maar als je alleen de grafiek waarden van totaal op nul wil laten zakken ,
kun je met een macrootje de gele waarden op nul zetten en ergens anders opslaan. en omgekeerd.

 

[jbronzwaer]

Hr.

De reactie van Sylvester drong niet goed tot me door.
Waarschijnlijk omdat ik er zelf ook aan gedacht heb om de oplossing te zoeken in de tabel, behorende bij de grafiek. Dat was me net iets te vanzelfsprekend. Ik ben er echter inmiddels wel achter dat MS in Excel 2010 de charts niet bepaald heeft opgeleukt, nee, er waren veel klachten over en misschien dat ze daarom in Excel 2013 zo hun best hebben gedaan, dat terzijde. De code die ik nodig heb bestaat mogelijk niet, zelfs John Walkenbach heeft het daarover al in Excel 2007.

Toch gedaan om te zoeken in de hoek die Sylvester voorstelt en het experimenteren kon beginnen. Tot mijn verbazing bleek het voldoende om in de tabel (zeer complexe tabel op een anders sheet gepositioneerd), de betreffende regel die moest worden onderdrukt gewoon even te verbergen. En ja hoor, de kolom verdwijnt keurig in de grafiek.
Beetje code hiervoor geschreven en . . .Opgelost.
Sylvester, you make my day

Iedereen die meedacht: bedankt