Doorgaan naar hoofdcontent

Posts

Posts uit 2013 weergeven

Excel: Inspired By a Nice Graph in a Dutch News Paper

Inspired by a nice graph from the Volkskrant of last Saturday:


The data from A1:E15:

In procentenHelemaal natuurBeetje natuurGeen natuurTropisch regenwoud9541De Veluwe9370De Waddenzee9181Damherten83152Schone lucht78184Merels75232Schapen in de wei68302Graanvelden52417Een boomrijk stadspark40564Medicinale planten324919Een klimop in de achtertuin245917Muntthee113851Bedrijventerrein met bomen54154Een hondenuitlaatplaats31879
You can download the file excelnatuur.xlsx through this link:
https://drive.google.com/folderview?id=0B7HgkOwFZtdZVmhRQUZFM28yc1U&usp=sharing

Excel: Line Chart With Markers with Different Colors Above and Below Target

A simple but nice idea. I just could not work out the idea to give the line above different colors when above or below the target line. Myabe somebody has a better idea?


Here are the data from A1:E14:

YearRealTargetAboveBelow2001130100130#N/A2002120100120#N/A200380100#N/A802004110100110#N/A200590100#N/A902006120100120#N/A200776100#N/A762008111100111#N/A2009112100112#N/A201097100#N/A97201195100#N/A952012104100104#N/A2013106100106#N/A
You can download the file lijngrafiek.xlsx through this link:
https://drive.google.com/folderview?id=0B7HgkOwFZtdZVmhRQUZFM28yc1U&usp=sharing

Excel: Bar and Column Graph Combined Gives a banded Chart

When you combine a bar and a column graph you can create this nice example:


Here are the data from A1:C10:

YearAmountBands2001 € 120,00 02002 € 134,00 82003 € 100,00 02004 € 123,00 82005 € 154,00 02006 € 111,00 82007 €   98,00 02008 € 145,00 80
You can download the file ExcelBanded.xlsx through this link:
https://drive.google.com/folderview?id=0B7HgkOwFZtdZVmhRQUZFM28yc1U&usp=sharing

Friesland: chronogrammen in grafmonumenten of muurstenen

Onlangs kreeg ik een e-mail van Hindrik de Jong uit Tjalleberd. Hij had een bericht ontvangen van een Duitse kennis met een grafschift waarin een jaartal vervlochten zat:

Mors est pIo abItVs aD ChrIstI regna

Hij vroeg zich af of wij zoiets in Friesland wel eens tegengekomen waren. De twee gevallen die mij te binnen willen schieten, zijn die van de muursteen in de kerktoren van de Benedictuskerk te Dantumawoude (http://www.benedictuskerk.nl/?pagina=toren):

theoDorVs V sCheLtInga Den eerstgeboren geeft aen ons toren een eeVWig steen Voor VaDers been.
en de stichtingssteen van de St. Michaelskerk te Woudsend:

haeC eXstrUCta DeI trInI est In LaUDIbUs aeDes eXstet et In pago grata per enne bonIs


Alle waarden van de hoofdletters, als Romeinse cijfers, vormen het totaal van 1792.

Van een goede vriend hoorde ik dat dit fenomeen chronogram wordt genoemd. Een andere naam is jaardicht (http://nl.wikipedia.org/wiki/Jaardicht)
Ik heb eens rondgekeken naar meer voorbeelden. Via de website http://erfgoedkloo…

Excel: Graph with two Y Axis

Saw a graph with two Y-axis in the Dutch magazine Elsevier. This is what I made of it:


The orginal looked like this:


Here are the data from A1:C8

Dec. 2013Compared to 2012Germany1,74 %0,36 %Netherlands2,06 %0,45 %France2,17 %0,13 %Italy4,08 %-0,42 %Spain4,15 %-1,16 %Portugal5,87 %-1,70 %Greece8,54 %-7,39 %
You can download the file ExcelTwoYAxis.zip through this link:
https://drive.google.com/folderview?id=0B7HgkOwFZtdZVmhRQUZFM28yc1U&usp=sharing

Word VBA: Autotext and Built In Building Block Entries

The first script deletes all autotext entire from the normal.dotm

Sub DeleteNormalAutoTextEntries()
    'goal: delete all autotext entries from normal.dotm
    Dim i As AutoTextEntry
    'wissen autotextentries
    For Each i In NormalTemplate.AutoTextEntries
        i.Delete
    Next
End Sub

The second script deletes all built in building block entries from the template built-in building blocks.dotx

Sub DeleteBuiltinBuildingblockentries()

    'Word 2010 and up
    'goal: delete all elements from built-in building blocks.dotx

    On Error Resume Next 'necessary while deleting from the template causes errors

    Dim objTemplate As Template
    Dim i As Integer 'counter
    Dim bb As Word.BuildingBlock 

    Set objTemplate = Templates(1) 'templates(1) = built-in building blocks.dotx
    For i = 1 To 10 'you need more loupes while it simply doed not work to delete all in one round
        For Each bb In objTemplate.BuildingBlockEntries
           bb.Delete
        Next
    Nex…

Excel: Pie Chart With Two Different Pies

In Excel it looked impossible two create a pie chart with two different pies in one chart. And of course I did not want to paste two pies together. By using the type Pie of Pie I managed to do it. Could not yet find an example of this on the internet.


Here are the data from A1:D7:

FruitVegetablesApples1Lettuce7Pear2Cabbage8Bananas3Spinach9Grapes4Endive10Cherries5Carrots11Strawberries6Sprouts12
You can download the file ExcelTwoCircles.zip through this link:
https://drive.google.com/folderview?id=0B7HgkOwFZtdZVmhRQUZFM28yc1U&usp=sharing

Excel: Separated X axis

Very nice graph in a Dutch newspaper (de Trouw) which I remade in Excel.


Here are the data from A1:D5:

Liquor Price (%)Liquor Sales (%)tussen20122,4-4,0-1,52013/13,8-10,4-1,52013/23,7-9,6-1,52013/33,8-8,1-1,5Create a Stacked Bar Diagram based on the range A1:D5.Set the color of the fourth part to No fill.Add a line graph based on column two.Add labels for this line.Choose Above for the labels.Set the color of the line graph to No color.Create a name label2:=Blad1!$C$2:$C$5+Blad1!$D$2:$D$5 Add this name to the graph as a line graph.Add labels for this line.Choose Below for the labels.Set the color of the line graph to No color.Add a another line graph based on column four.Add this line to the Secondary Axis.Change the secondary Y-axis in a way that the horizontal axis crosses at -1,5.Both axes should run from 6 to -14.Remove both Y-axis.Change both X-axes so that the line is black.Remove the labels of the secondary horizontal axis.Add two boxes and link those to B1 and C1 respectively.Fo…

Word: Aanpassen van het lint in Word 2010 via XML en VBA

1.1Inleiding In de volgende voorbeelden gebruiken we de Office Custom UI Editor en Word template add-ins. We gebruiken deze manier omdat:
§de Custom UI Editor automatisch de vereiste Open Office XML bestandsrelaties maakt §we dan geen additionele ontwikkelsoftware als Visual Studio nodig hebben §en we gewoon gebruik kunnen maken van VBA om het lint aan te roepen
De Office Custom UI Editor kunne we gratis downloaden via OpenXMLDeveloper.org: Custom UI Editor
Het aanpassen van de linten van Word zoals hier getoond, kunnen we toepassen op een los Word sjabloon of via een Word add-in. 1.2Voorbeeld 1 Het eerste voorbeeld is tamelijk simpel. We gaan hier een losse knop op een tab verbergen. We gaan de knop Macro’s op de tab Beeld verbergen.
§Maak een leeg sjabloon dat macro’s kan bevatten: voorbeeld1.dotm §Sluit het document en sluit Word. §Start de Office Custom UI Editor. §Open het sjabloon voorbeeld1.dotm. §Voeg de juiste Office Custom UI Part toe.

§Plak het volgende RibbonXML script in het Custom…