Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
772to776
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
772to776
772to776
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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

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

Links zu Excel-Dialogen

Label

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige