Hallo,
ich hab auf meinem Formular ein Diagramm platziert.
Die Daten werden per RowSource auch problemlos visualisiert.
Da es aber nicht immer die selbe Art von Daten sind, die visualisiert werden, möchte ich doch die Achsenbeschriftungen und -skalierungen anpassen.
Leider erhalte ich dabei den Laufzeitfehler 1004: Die Caption-Eigenschaft des AxisTitle-Objektes kann nicht festgelegt werden.
So weit mein (problemrelevanter) Code:
Dim objChart As Graph.Chart
Set objChart = Me.Diagramm.Object
With objChart.Axes(xlCategory)
.HasTitle = True
.AxisTitle.Caption = Me!txtEinheit 'z.B. mA
End With
Im Internet hab ich bereits ebenfalls ein Codebeispiel gefunden, das genauso aussieht.
Und auch in der VBA-Hilfe ist das Beispiel identisch mit meiner Kreation:
With myChart.Axes(xlValue)
.HasTitle = True
With .AxisTitle
.Caption = "Revenue (millions)"
.Font.Name = "bookman"
.Font.Size = 10
End With
End With
Allerdings wird in einem anderen Beispiel statt der Caption-Eigenschaft auch die Text-Eigenschaft verwendet. Bei mir funktioniert beides nicht.
With myChart.Axes(xlCategory)
.HasTitle = True
.AxisTitle.Text = "Month"
End With
Das Textfeld Me!txtEinheit ist jedenfalls richtig benannt.
Der Verweis auf die Microsoft Graph 11.0 Object Library ist ebenfalls gesetzt.
Ist dann die Klasse „MSGraph.Chart. 8“ laut Diagramm-Eigenschaften eigentlich korrekt?
Wer kann mir weiterhelfen?
Gruß, Andreas