Excel-freak gezocht m.b.t. grafieken.

[Con]

Ik mag mij wel scharen onder een vba goeroe echter grafieken in Excel zijn mij vreemd.

(25 jaar terug waren grafieken mijn kindje met polynomen als eindresultaat,

nu, na 25 jaar ben ik een hoop kwijt (snik)).

 

Wat is de vraag?

 

Ik heb een tabellutje waar wat gegevens instaan.

Bovenaan het tabel staat een titel die ik graag als grafiektitel wil zien.

 

Wat ik ook doe, deze tekst wordt NIET gezien als grafiektitel.

 

LET WEL, hoe er een tabel er uit moet zien is voor mij trail and error,

ik had al aangegeven dat grafieken niet mijn sterkste kant zijn.

 

Dus hoe moet die (tabel)indeling eruit zien om ook een grafiektitel

mee te nemen het grafiek in?

 

 

[Psychosammie]

Bedoel je zoiets?

 

[Con]

Inderdaad, dat bedoel ik.

 

Uiteraard heb ik een ander tabel waarbij dit niet lukt.

Ik zal dat tabel even "discretiseren" (wellicht een nieuw woord)

en dan plaatsen. Mogelijk heb je daar een oplossing voor.

Dat wordt wel morgen.

[De_Perre]

Indien je gegevens in slechts één kolom staan, neemt Excel de titel mee over wanneer je een grafiek maakt.

 

Bij meerdere kolommen worden de kolommen als datareeks aanzien; en zal je zelf de titel moeten toevoegen.

[Con]

1. Wat vind je van de samenleving			
aantal mensen	 130	  380	    200
waardering	onvoldoende	voldoende	goed
cijfer	           5    	7,5 	8,6
gemiddeld	       7	    7	    7

[De_Perre]

Ok, dat maakt het iets duidelijker.

 

Via Google nog iets gevonden:

Citaat

Here is how you can make it dynamic (i.e., make it refer to a cell in the workbook):

• Click on the Chart Title box
• Go to Formula bar and type =
• Select the cell that you want to show as the chart title
• Hit Enter

 

 

 

**EDIT**

Ik had voor ik dat gevonden had nog een merge gedaan van A1 tot D1; maar dat was blijkbaar niet nodig.

27 maart 2019 aangepast door De_Perre
merge cellen

[Con]

Die had ik ook gevonden maar dat is ook achteraf.

 

Wat ik nu heb gedaan is een record gestart, grafiek aangemaakt,

titel gerefereerd en de macro-recorder afgesloten.

 

Nu kan ik met vba vooraf verwijzen naar de betreffende cel dus opgelost.

Range("F115:H118").Select en dan offset toepassen voor de titel.

 

Bedankt voor je aandeel.

 

PS nog ff de code;

• Range("F115:H118").Select
• ActiveSheet.Shapes.AddChart2(201, xlColumnClustered).Select
• ActiveChart.ApplyChartTemplate ( _
• "C:\Users\Genius\AppData\Roaming\Microsoft\Sjablonen\Charts\Grafiek6.crtx")
• ActiveChart.SetSourceData Source:=Range("'6'!$F$115:$H$118")
• ActiveChart.ChartTitle.Select
• Selection.Caption = "='6'!R113C6"

 

Via Google nog iets gevonden:

  Citaat

Here is how you can make it dynamic (i.e., make it refer to a cell in the workbook):

• Click on the Chart Title box
• Go to Formula bar and type =
• Select the cell that you want to show as the chart title
• Hit Enter

28 maart 2019 aangepast door Con