VBA: Chart-Title Objekt

Bild

Betrifft: VBA: Chart-Title Objekt
von: Jill
Geschrieben am: 05.11.2003 11:06:02

Hallo,

kann mir jemand bei folgendem Prooblem helfen? Ich bekomme immer folgenden Fehler:

"Laufzeitfehler 1004: Die Text-Eigenschaft des Chart-Title Objektes kann nicht "festgestellt werden.

Liegt es vielleicht an einem fehlenden Verweis?

Hier noch ein Ausschnitt aus dem Code:

'To rename the chart title
Charts(conChartName).ChartTitle.Text = "Risk/Value Matrix : " & strType & " Projects"

'To position the axes relatively or fixed
If blnAxeRel = True Then
With Charts(conChartName)
.Axes(xlCategory).MinimumScaleIsAuto = True
.Axes(xlCategory).MaximumScaleIsAuto = True

.....

Danke und Grüsse
Jill

Bild


Betrifft: AW: VBA: Chart-Title Objekt
von: Galenzo
Geschrieben am: 05.11.2003 11:13:26

Hallo,
schreibst du dies:
ChartObjects(conChartName).Chart.HasTitle = True
ChartObjects(conChartName).Chart.ChartTitle.Text = ....

Viel Erfolg!


Bild


Betrifft: AW: VBA: Chart-Title Objekt
von: Jill
Geschrieben am: 05.11.2003 11:23:37

Hallo Galenzo,

danke erst mal für Deine Hilfe. Wenn ich das einfüge, erhalte ich
"Fehler beim Kompilieren: Sub oder Function nicht definiert"

Hast Du eine Ahnung, woran das liegen könnte?

Grüsse
Jill


Bild


Betrifft: AW: VBA: Chart-Title Objekt - Fehler
von: Galenzo
Geschrieben am: 05.11.2003 12:11:45

Keine Ahnung - liegt jedenfalls nicht an diesen beiden Zeilen...
mfg


Bild


Betrifft: AW: VBA: Chart-Title Objekt
von: Guido S.
Geschrieben am: 05.11.2003 12:20:42

Ich mache das bei einem Diagramm folgendermassen:

[...]
ActiveSheet.ChartObjects("so_heiss_mein_diagramm").Activate
With ActiveChart ' Diagramm formatieren
.ChartType = xlLine
.HasLegend = flase
.HasAxis = True
.HasTitle = True
End With
[...]
ActiveChart.ChartTitle.Select ' Diagrammtitel formatieren
Selection.Characters.Text = "Diagramm-Titel"
[...]

Hoffe es hilft ein wenig.

Gruß
Guido


Bild


Betrifft: AW: Tip: kein select nötig
von: Galenzo
Geschrieben am: 05.11.2003 12:52:36

Hallo,
mein Tip:
schreibe statt
ActiveChart.ChartTitle.Select ' Diagrammtitel formatieren
Selection.Characters.Text = "Diagramm-Titel"

nur

ActiveChart.ChartTitle.Characters.Text = "Diagramm-Titel"

Ist kürzer, schneller, besser.

mfg - Galenzo


Bild


Betrifft: AW: Tip: kein select nötig
von: Guido S.
Geschrieben am: 05.11.2003 12:57:06

Werde es probieren Galenzo.
thx


Bild

Beiträge aus den Excel-Beispielen zum Thema " VBA: Chart-Title Objekt"