Doorgaan naar hoofdcontent

Excel: labels bij de reeksen in plaats van een legenda

In 2009 al kwam Jon Peltier met ideeën over het plaatsen van labels bij reeksen in plaats van een legenda. Zie artikel. Mynda Tracey heeft dit verder uitgewerkt. Haar methode is evenwel tamelijk omslachtig.

Vanaf versie 2013 zijn er andere mogelijkheden in Excel. In het geval van labels kun je nu ook de optie kiezen Waarde uit cellen.











In plaats van een bereik kun je dan ook een naam gebruiken die naar een bereik verwijst. Kijk naar het onderstaande voorbeeld.


Ik heb hiervoor de volgende data gebruikt:

Year Series A Series B Series C
2001 100 120 150
2002 150 240 300
2003 300 360 450
2004 350 480 600
2005 500 600 750
2006 550 720 900
2007 700 840 1050
2008 750 960 1200
2009 900 1080 1350
2010 950 1200 1500
2011 1100 1320 1650
2012 1150 1440 1800
2013 1300 1560 1950
2014 1350 1680 2100
2015 1500 1800 2250
2016 1550 1920 2400
2017 1700 2040 2550

Vervolgens heb ik in een blad genaamd legendattheend drie namen gemaakt:

ReeksA:
=VERSCHUIVING(legendattheend!$E$2;0;0;AANTALARG(legendattheend!$B:$B)-2;1);legendattheend!$B$1

ReeksB:
=VERSCHUIVING(legendattheend!$E$2;0;0;AANTALARG(legendattheend!$C:$C)-2;1);legendattheend!$C$1

ReeksA:
=VERSCHUIVING(legendattheend!$E$2;0;0;AANTALARG(legendattheend!$D:$D)-2;1);legendattheend!$D$1

Vervolgens heb ik lijngrafiek gemaakt op basis van de gegevens van de tabel. Bij elk van de lijnen heb ik gekozen voor Gegevenslabelstoevoegen.



Bij de Labelopties heb ik voor alle lijnen Waarde uitgevinkt. Bij Bereik selecteren heb ik respectievelijk ingevuld (de naam van het bestand is ExcelPictogrammen.xlsx):

=ExcelPictogrammen.xlsx!ReeksA
=ExcelPictogrammen.xlsx!ReeksB
=ExcelPictogrammen.xlsx!ReeksC

En de boel werkt. Als ik nu wat waarden in de kolommen wis, komt de grafiek er zo uit te zien:

Andere blogs over Excel

Voor het beste overzicht verwijs ik naar een pagina van mijn website: http://www.walmar.nl/spreadsheets.asp
Labels:

Reacties

Een reactie posten

Populaire posts van deze blog

Friesland: nu ruim 1500 Friese familiewapens doorzoekbaar

Inleiding Het totale overzicht is nu ook als PDF te downloaden: rptWapens Al jaren verzamel ik de teksten van grafzerken en andere voorwerpen om ze in een database bijeen te brengen. Op heel veel oude grafzerken, rouwborden of andere voorwerpen in Friesland treffen we naast tekst ook vaak familiewapens aan. Ruim een jaar geleden ben ik gestart met het koppelen van familiewapens aan deze teksten. Met behulp van deze database kunnen we nu steeds meer voorheen onbekende wapens thuisbrengen of andersom, initialen herleiden tot de bijbehorende namen. Een voorbeeld. Zo kennen we uit het boek Fries Zilver nummer 894 met de tekst: TDH RBB 1669 Tjitte D. Wijngaarden geboren 6 october 1874 Daarbij een mannen- en een vrouwenwapen. Mannenwapen blijkt dat van Hoitinga te zijn. De letters blijken vervolgens te herleiden tot Tjepke Douwes Hoitinga en Rienkje Bouwes Bruinsma uit Nijland. Vermoedelijk getrouwd in 1669! Opgelost. Ander voorbeeld. Op een lepel uit het boek Dokk...
1 reactie
Meer lezen

Excel: VBA script om wachtwoord te verwijderen

Af en toe krijg ik een vraag om een wachtwoord van een Excel blad te halen. Doodsimpel met VBA. Hier een script dat ik gebruik: Sub WachtwoordCrack()     Dim a As Integer, b As Integer, c As Integer, d As Integer, _     e As Integer, f As Integer, g As Integer, h As Integer, _  I As Integer, j As Integer, k, m As Integer     Dim begin As Date, eind As Date     Dim duur As String     Dim objSheet As Worksheet     begin = TimeValue(Time)     On Error Resume Next     For Each objSheet In Application.Worksheets         For a = 65 To 66: For b = 65 To 66: For c = 65 To 66             For d = 65 To 66: For e = 65 To 66: For f = 65 To 66                 For g = 65 To 66: For h = 65 To 66: For I = 65 To 66                     For j = 65 To 66: For k = 65 To...
1 reactie
Meer lezen

Excel: Creating Your Own Tabs With XML And VBA

In order to create you own nice looking tabs you need the Custom UI Editor for Microsoft Office. You can download it for free. How is this different from choosing File , Options , Customize Ribbon and adding a new tab with new groups and then commands to the group? You can also move the new tab to any position. T hen your new tab is always there. Even when you don't open the specific file with the right VBA. In my example the outcome looks like this, a nice tab, placed in front of the Home Tab. You will only get this tab when you start the specific example (which you can download). The XML behind this: <customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">    <ribbon startFromScratch="false">     <tabs>       <tab id="MaxIlze" label="Dossier Overzicht" insertBeforeMso="TabHome">         <group id="customGroup1" label="Adressen verrijken">         ...
Een reactie posten
Meer lezen