Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
772to776
772to776
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Diagramm formatieren

Forumthread: Diagramm formatieren

Diagramm formatieren
14.06.2006 17:13:07
Jens
Hallo,
im Anhang befindet sich eine Exceldatei mit 2 Diagrammen. Das rechte ist nur ein Bild und dient als vorlage.
https://www.herber.de/bbs/user/34364.xls
Ich brauch das Diagramm genauso, allerdings hab ich Probleme mit den Prozent angaben.
Vielleicht kann mir jemand helfen, vielen Dank im voraus
Gruß Jens
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Diagramm formatieren
14.06.2006 19:57:20
Christoph
Hallo Jens,
folgendes Makro zeigt das Prinzip. Allerdings musst du die Zeilen 4 und 5 vertauschen, damit die Reihenfolge der Datenreihen 1 - 4 den Zeilen 2 bis 5 entsprechen - oder das Makro anpassen.
Des Weiteren musst du den Name des Dias anpassen (in deiner Datei war das "Diagramm 4") oder mit ActiveChart arbeiten.
Gruß, Christoph 
Option Explicit
Sub Datenpunkte()
Dim ch As Chart, sc As Series
Dim p As Long, i As Long
Set ch = ActiveSheet.ChartObjects("Diagramm 4").Chart
For i = 1 To 4
Set sc = ch.SeriesCollection(i)
sc.ApplyDataLabels ShowValue:=True
For p = 1 To sc.Points.Count
sc.Points(p).DataLabel.Text = Format(ActiveSheet.Cells(i + 1, p + 1), "0.0%")
Next
Next
End Sub
Anzeige
AW: Diagramm formatieren
16.06.2006 10:15:59
Jens
Vielen, vielen Dank!!!
Hat super funktioniert.
Gruß
Jens
;

Beliebteste Forumthreads (12 Monate)

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