<\/p>\n
Die mit Access 2019\/Office 365 eingeführten modernen Diagramme bieten eine VBA-Schnittstelle an, mit der Sie die Diagramme steuern können. Dieser Beitrag zeigt, wie das Objektmodell für moderne Diagramme aussieht und liefert einige Beispiele für die Nutzung der VBA-Steuerung für moderne Diagramme. In einem Fall zeigen wir etwa, wie Sie die Bereiche der Y-Achse für ein Diagramm abhängig von den enthaltenen Werten einstellen können.<\/b><\/p>\n
Da die modernen Diagramme wie die übrigen Steuer-elemente in Access integriert sind und nicht etwa als ActiveX-Steuerelement bereitgestellt werden (wie es beispielsweise beim alten Diagramm-Steuerelement der Fall war), finden Sie diese im Objektkatalog des VBA-Editors als eigene Klasse namens Chart<\/b> (siehe Bild 1). <\/p>\n
![\"Chart-Klasse](\"..\/fileadmin\/_temp_\/2019_02\/pic_1183_001.png\")
<\/p>\n
Bild 1: Chart-Klasse im Objektkatalog<\/span><\/b><\/p>\n Hier finden wir nicht nur bei der Suche nach dem Begriff Chart <\/b>direkt die Konstante für den Steuerelementtyp, nämlich acChart<\/b>, sondern auch die Klasse Chart <\/b>mit all ihren Eigenschaften.<\/p>\n Darunter gibt es auch einige Elemente, die wiederum Auflistungen oder Klassen enthalten wie ChartAxis<\/b>, ChartAxisCollection<\/b> und so weiter.<\/p>\n Aber ist mit der Chart<\/b>-Klasse tatsächlich das moderne Diagramm-Steuerelement gemeint oder referenzieren wir damit eventuell sogar das alte, etwas betagtere Diagramm-Element Das müssten wir erst einmal herausfinden.<\/p>\n Dazu fügen wir einem Formular sowohl ein altes als auch ein modernes Diagramm-Steuerelement hinzu und benennen diese in ctlOld <\/b>und ctlNew<\/b> um (siehe Bild 2).<\/p>\n Bild 2: Ein altes und ein modernes Diagramm-Steuerelement<\/span><\/b><\/p>\n Dann öffnen wir das Formular in der Formularansicht und lassen uns im Direktbereich des VBA-Editors die Typen der beiden Diagramme ausgeben. Zuerst rufen wir die Typename<\/b>-Funktion für das alte Diagramm auf und erhalten als Ergebnis ObjectFrame<\/b>:<\/p>\n ObjectFrame <\/b>ist aber nur der Container, in dem das eigentliche Steuer-element enthalten ist. Also ermitteln wir noch den Typ des enthaltenen Steuerelements:<\/p>\n Danach führen wir den gleichen Befehl für das neue Diagramm aus:<\/p>\n Das ist nun interessant, denn beide Steuer-elemente entsprechen zumindest einem Objekttyp gleichen Namens. Sind die Chart<\/b>-Eigenschaften, die wir im Objektkatalog gefunden haben, aber nun die Eigenschaften für das moderne oder für das herkömmliche Chart<\/b>-Element Wenn wir uns ein Detail anschauen, scheint es sich hier um die Eigenschaften für das moderne Element zu handeln.<\/p>\n Die Eigenschaft ChartType <\/b>der Chart<\/b>-Klasse liefert nämlich genau elf Elemente – und so viele Möglichkeiten bietet auch die Eigenschaft Diagrammtyp <\/b>im Eigenschaftsfenster für das moderne Diagramm-Steuerelement im Formular.<\/p>\n Die herkömmliche Chart<\/b>-Klasse bietet 18 verschiedene Diagrammtypen. Gehen wir also an dieser Stelle davon aus, dass die Chart<\/b>-Klasse die für das moderne Diagramm passenden Eigenschaften liefert.<\/p>\n Wir verschaffen uns zunächst einen überblick über die Eigenschaften der Chart<\/b>-Klasse und ordnen diese den Eigenschaften im Eigenschaftenblatt beziehungsweise im Bereich Diagrammeinstellungen <\/b>für das moderne Diagramm-Steuerelement zu.<\/p>\n Die folgenden Eigenschaften sind die allgemeinen Eigenschaften des Diagramm-Steuerelements.<\/p>\n Wir geben jeweils den VBA-Namen der Eigenschaften an, dann die Entsprechung in der Benutzeroberfläche und, soweit notwendig, die Funktion der angegebenen Eigenschaft:<\/p>\n Diese Eigenschaften verwenden Sie zum Einstellen des Aussehens der Titelzeile des Diagramms:<\/p>\n Bild 3: Einige mit dem jeweiligen Namen beschrifteten Eigenschaften eines Diagramms<\/span><\/b><\/p>\n Die folgenden Eigenschaften verwenden Sie, um den Untertitel eines Diagramms und seine Eigenschaften einzustellen:<\/p>\n <\/p>\n Diese Eigenschaften geben an, wie die X-Achse\/Rubrikenachse ausgestattet werden soll:<\/p>\n Auch für die Anzeige der Legende gibt es verschiedene Eigenschaften.<\/p>\n Diese finden Sie in der folgenden Auflistung:<\/p>\n Die folgenden Eigenschaften stehen für die primäre und die sekundäre Y-Achse zur Verfügung und sind meist im Bereich Format <\/b>des Eigenschaftenblatts zu finden:<\/p>\n Bei drei Elementen der allgemeinen Eigenschaften von Diagrammen haben wir auf diesen Abschnitt hier verwiesen: ChartValuesCollection<\/b>, ChartAxisCollection <\/b>und ChartSeriesCollection<\/b>. Diese finden Sie während der Entwurfsansicht des Formulars mit dem Diagramm teilweise im Bereich Diagrammeinstellungen|Daten<\/b>.<\/p>\n Die Auflistung ChartValueCollection <\/b>enthält Elemente des Typs ChartValue<\/b>. Diese entsprechen den aktivierten Optionen der Eigenschaft Werte\/Größen (Y-Achse) <\/b>unter Diagrammeinstellungen|Daten<\/b>. Jedes dieser Elemente enthält zwei Eigenschaften, nämlich Name <\/b>und AggregateType<\/b>. Name entspricht dem Teil der jeweiligen Option vor den Klammern, AggregateType <\/b>dem Teil in Klammern – dort zum Beispiel Summe<\/b>. Die Elemente entsprechen den markierten Einträgen der Eigenschaft Werte\/Größen (Y-Achse) <\/b>unter Diagrammeinstellungen|Daten <\/b>(siehe Bild 4).<\/p>\n Bild 4: Collections in den Diagrammeinstellungen<\/span><\/b><\/p>\n Mit der folgenden Prozedur lassen wir uns die Werte von Name <\/b>und AggregateType <\/b>der aktuellen ChartValues<\/b>-Elemente ausgeben (dazu muss das Formular in der Formularansicht angezeigt werden und das Diagramm-Steuerelement muss den Fokus haben):<\/p>\n Für die Konstellation in der Abbildung erhalten wir hier die folgende Ausgabe:<\/p>\n Für die Eigenschaft AggregateType <\/b>gibt es die Auflistung acAggregateType <\/b>mit den folgenden Werten (die Bedeutung ist selbsterklärend):<\/p>\n Die Auflistung ChartAxisCollection <\/b>enthält Elemente des Typs ChartAxis<\/b>. Die Auflistung entspricht den für die Eigenschaft Achse (Rubrik) <\/b>im oberen Bereich des Dialogs Diagrammeinstellungen|Daten <\/b>markierten Optionen, in unserem Beispiel der Eintrag Monat<\/b>.<\/p>\n Die aktuellen Elemente dieser Auflistung geben wir mit der folgenden Prozedur im Direktfenster aus:<\/p>\n Die Ausgabe für unser Beispiel sieht wie folgt aus:<\/p>\n Neben der Eigenschaft Name <\/b>enthält das ChartAxis<\/b>-Objekt noch eine weitere Eigenschaft namens GroupType<\/b>, die wir hier als zweiten Wert ausgegeben haben. GroupType <\/b>nimmt einen Wert der Auflistung acDateGroupType <\/b>auf.<\/p>\n Diese Auflistung hat die folgenden Konstanten und Werte (in Klammern):<\/p>\n![\"Ein](\"..\/fileadmin\/_temp_\/2019_02\/pic_1183_002.png\")
<\/p>\nUnterschiede zwischen altem und neuem Diagramm<\/h2>\n
Typename(Forms!frmAltUndNeu!ctlAlt)\r\nObjectFrame<\/pre>\n
Typename(Forms!frmAltUndNeu!ctlAlt.Object)\r\nChart<\/pre>\n
Typename(Forms!frmAltUndNeu!ctlNeu)\r\nChart<\/pre>\n
VBA-Eigenschaften der Chart-Klasse<\/h2>\n
Allgemeine Eigenschaften<\/h2>\n
\n
Eigenschaften des Titels des Diagramms<\/h2>\n
\n
![\"Einige](\"..\/fileadmin\/_temp_\/2019_02\/pic_1183_006.png\")
<\/p>\nEigenschaften für den Untertitel des Diagramms<\/h2>\n
\n
Eigenschaften für die X-Achse\/Rubrikenachse<\/h2>\n
\n
Eigenschaften für die Legende<\/h2>\n
\n
Primäre und sekundäre Y-Achse<\/h2>\n
\n
Auflistungen in Diagrammen<\/h2>\n
Die Auflistung ChartValueCollection<\/h2>\n
![\"Collections](\"..\/fileadmin\/_temp_\/2019_02\/pic_1183_003.png\")
<\/p>\nPublic Sub <\/span>ChartValuesAusgeben()\r\n Dim <\/span>objChartValues As <\/span>ChartValues\r\n For Each objChartValues In Screen.ActiveControl. ChartValuesCollection\r\n Debug.Print<\/span> objChartValues.Name, objChartValues.AggregateType\r\n Next<\/span> objChartValues\r\nEnd Sub<\/span><\/pre>\nUmsatz 1 \r\nRabatt 1<\/pre>\n
\n
Die Auflistung ChartAxisCollection<\/h2>\n
Public Sub <\/span>ChartAxisAusgeben()\r\n Dim <\/span>objChartAxis As <\/span>ChartAxis\r\n For Each objChartAxis In Screen.ActiveControl. ChartAxisCollection\r\n Debug.Print<\/span> objChartAxis.Name, objChartAxis.GroupType\r\n Next<\/span> objChartAxis\r\nEnd Sub<\/span><\/pre>\nMonat 0<\/pre>\n
\n