Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
168to172
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
168to172
168to172
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Beschriftung im Diagramm verschieben

Beschriftung im Diagramm verschieben
17.10.2002 19:36:35
Walerij iffel
Hallo ALL,

ich habe ein kleines Problem mit der verschiebung einer Beschriftung im Diagramm per Code.

Wenn ich es einfach so ausführe (ActiveChart.ChartTitel.Left = x)
Dann macht es im garnichts keine Fehlermeldung nichts.

Und wenn ich vorher aber Application.ScreenUpdating = True setze
Dann führt er es ohne Probleme aus.

Kann mir vielleicht einer helfen?

Bedanke mich im voraus.

MfG

Walerij Riffel

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Beschriftung im Diagramm verschieben
18.10.2002 03:23:20
Ralf Sögel
Dann machs doch so.
Re: Beschriftung im Diagramm verschieben
18.10.2002 10:15:45
Walerij Riffel
Hallo Ralf,

danke für dein Kommentar. Aber Bei einem Fall können es 28 Diagramme erstellt werden deswegen wollte ich es das der Anwender die Diagramme erst am Ende zu sehen bekommt und nicht ein ständiges Blinken Kopfschmerzen verursacht.

Vielleicht gibt es etwas anderes beim Zugriff auf das Objekt.
Oder eine Freigabe oder so etwas ähnliches.

Würde mich über weitere Vorschläge freuen.

MfG

Walerij Riffel

Re: Beschriftung im Diagramm verschieben
18.10.2002 11:38:08
LÖSUNG
Hallo Leute,

wenn es jemanden Interessiert hier eine mögliche Lösung.

With ActiveSheet.ChartObjects(1).Chart
.HasTitle = True
.ChartTitle.Text = x
.ChartTitle.Left = .Axes(xlValue).Left
.ChartTitle.AutoScaleFont = True
End With

WICHTIG: Objekt Zugriff über ChartObjects(1).Chart
nicht über ActiveChart.
AutoScaleFont auf True setzen.

Viel Spaß beim verschieben und formatieren.

MfG

Walerij Riffel

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige