Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Flächendiagramm Beschriftung ausrichten

Forumthread: Flächendiagramm Beschriftung ausrichten

Flächendiagramm Beschriftung ausrichten
02.02.2004 17:22:20
nils
hallo liebe programmierer,
ich habe ein flächendiagramm das über 52 wochen geht.
darin sind 50 datenreihen. die werte jeder datenreihe sind
in jeder woche anders.
ich brauche meine datenbeschriftung an dem wert der datenreihe der am
höchsten ist.
? wie kann ich den höchstwert der datenreihe auslesen,
und dann die diagramm beschriftung auf diesen datenpunkt setzen?
also 50 datenbeschriftungen für 50 datenreihen.
danke im vorraus
nils
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Flächendiagramm Beschriftung ausrichten
02.02.2004 21:23:00
K.Rola
Hallo,
Option Explicit
Option Base 1

Sub Ausrichten()
Dim ch As Chart, pts As Byte, p As Byte, t As Single, arr() As Single
Set ch = ActiveSheet.ChartObjects(1).Chart
pts = ch.SeriesCollection(1).Points.Count
ReDim arr(pts)
For p = 1 To pts
arr(p) = ch.SeriesCollection(1).Points(p).DataLabel.Top
Next
t = Application.Min(arr)
For p = 1 To pts
ch.SeriesCollection(1).Points(p).DataLabel.Top = t
Next
End Sub

Gruß K.Rola
Anzeige
Noch ein Hinweis...
02.02.2004 21:37:24
K.Rola
Hallo,
du solltest das Makro ggf. aus Private Sub Worksheet_Calculate()
ausführen, damit bei Veränderungen immer automatisch angepasst wird.
Gruß K.Rola
vielen dank ....nur noch nicht was ich brauche
03.02.2004 20:28:46
nils
ein tolles makro
nur leider habe ich mich nicht besser ausdrücken können
das makro schreibt mir die beschriftungen jetzt alle
oben an die decke
aber nicht an den datenpunkt mit der höchsten "value"
habe meinen entwurf heute noch mal mit beispiel hochgeladen
danke dir aber sehr
nils
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige