|
gezielt Linien in Diagramm einfügen
|
| Autor |
Nachricht |
Snowball
Gast
Verfasst am: 23. März 2007, 14:38 Rufname:
|
|
| Version: (keine Angabe möglich) |
|
Hi!
Ich möchte ein Säulen-Diagramm erstellen, in dem noch als Linie eingezeichnet Vergleichswerte stehen. Es gibt in den benutzerdefinierten Diagrammen eine Linie-Säule-Diagramm, in dem jedoch eine durchgezogene Linie entsteht. Mich interessieren Linien, die genauso breit wie eine Säule sind und praktisch in oder über den zugehörigen Säulen sitzen.
Hat jemand einen Tipp wie ich das am besten anstelle?
Grüße,
Snowball
|
|
Fred Walko
regelmäßiger EXCEL-User ohne VBA Ambitionen

Verfasst am: 26. März 2007, 21:08 Rufname: Fred
Wohnort: bei Heilbronn
|
| |
| Version: (keine Angabe möglich) |
|
Hallo snowball,
versuche mal folgendes:
für ein Säulendiagramm mit einer Säule:
Erstelle eine zusätzliche Datenreihe mit den Werten für zusätzliche Linie (im Beispiel 3. Reihe). Wandle den Diagrammtyp um in Punkt (XY), formatieren ohne Linien, als Markierung für den Punkt einen kleinen Strich wählen. Mit ca. 20 pte Größe erscheint die Punktmarkierung als kurze Linie.
für ein Säulendiagramm mit mehreren Säulen:
Erstelle wieder eine neue Datenreihe als Diagrammtyp Punkt (XY). Wie oben beschrieben erhälst du nur eine kurze Linie zwischen den Säulen. Hier soll der Fehlerindikator X die Linie Zeichnen. Fehlerindikator X auswählen und ohne Endmarkierung formatieren. Durch das Anpasen für die Plus- und Minusabweichung wird die Länge der Linie bestimmt. Im angefügten Beispiel habe ich die Werte in die Tabelle geschrieben (letzte beiden Zeilen). Es ist auch ein direkter Eintrag beim Fehlerindikator möglich.
Bei Fragen nochmals melden!
_________________ Gruß
Fred
Es gibt keine reine Wahrheit, aber ebensowenig gibt es einen reinen Irrtum (Friedrich Hebbel, Tagebücher)
| Beschreibung: |
|
 Download |
| Dateiname: |
Balken im Säulendiagramm.zip |
| Dateigröße: |
7.74 KB |
| Heruntergeladen: |
414 mal |
|
|
MarkusPehn
Im Profil kannst Du frei den Rang ändern
Verfasst am: 11. Mai 2007, 08:23 Rufname:
|
|
| Version: (keine Angabe möglich) |
|
thx, passwort der vba module?
vg mp
|
|
Fred Walko
regelmäßiger EXCEL-User ohne VBA Ambitionen

Verfasst am: 11. Mai 2007, 13:45 Rufname: Fred
Wohnort: bei Heilbronn
|
|
| Version: (keine Angabe möglich) |
|
sorry,
in dem Diagramm ist kein VBA verwendet.
_________________ Gruß
Fred
Es gibt keine reine Wahrheit, aber ebensowenig gibt es einen reinen Irrtum (Friedrich Hebbel, Tagebücher)
|
|
MarkusPehn
Im Profil kannst Du frei den Rang ändern
Verfasst am: 11. Mai 2007, 16:20 Rufname:
|
|
| Version: (keine Angabe möglich) |
|
aso, denk mirs ja... kenn mich zwar nicht wirklich mit vba aus, aber dass ich gar keinen code gefunden hätt...
du hast das nicht zufällig irgendwo in vba auch liegen, bzw. kannst es ohne großen aufwand als makro oder so aufzeichnen. hab leider wenig erfahrung auf dem gebiet und sollte das halt in c# coden, das wär das echt hilfreich.
vielen dank, für die antwort, lg markus
|
|
Fred Walko
regelmäßiger EXCEL-User ohne VBA Ambitionen

Verfasst am: 11. Mai 2007, 20:47 Rufname: Fred
Wohnort: bei Heilbronn
|
|
| Version: (keine Angabe möglich) |
|
Hi Markus,
wenn es dir etwas hilft: unten sind die aufgezeichenten Makros für den
Strich in einer Säule oder die
Linie in 2 Säulen:
Sub Strich_in_Saeule()
'
' Strich_in_Saeule Makro
' Makro am 11.05.2007 von Fred Walko aufgezeichnet
'
'
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(2).Values = "='Balken in Säulen'!R5C2:R5C5"
ActiveChart.SeriesCollection(2).Name = "='Balken in Säulen'!R5C1"
ActiveChart.SeriesCollection(2).Select
ActiveChart.SeriesCollection(2).ChartType = xlLineMarkers
ActiveChart.SeriesCollection(2).Select
With Selection.Border
.Weight = xlThin
.LineStyle = xlNone
End With
With Selection
.MarkerBackgroundColorIndex = xlAutomatic
.MarkerForegroundColorIndex = 3
.MarkerStyle = xlDash
.Smooth = False
.MarkerSize = 21
.Shadow = False
End With
ActiveWindow.Visible = False
Windows("Balken im Säulendiagramm.xls").Activate
Range("G9").Select
End Sub
Sub Linie_in_saeule()
'
' Linie_in_saeule Makro
' Makro am 11.05.2007 von Fred Walko aufgezeichnet
'
'
Windows("Balken im Säulendiagramm.xls").SmallScroll Down:=0
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(3).Values = "='Balken in Säulen'!R5C2:R5C5"
ActiveChart.SeriesCollection(3).Name = "='Balken in Säulen'!R5C1"
Windows("Balken im Säulendiagramm.xls").SmallScroll Down:=9
ActiveChart.SeriesCollection(3).Select
ActiveChart.SeriesCollection(3).ChartType = xlXYScatter
ActiveChart.SeriesCollection(3).Select
ActiveChart.SeriesCollection(3).ErrorBar Direction:=xlX, Include:=xlBoth, _
Type:=xlCustom, Amount:="='Balken in Säulen'!R7C2:R7C5", MinusValues:= _
"='Balken in Säulen'!R6C2:R6C5"
Windows("Balken im Säulendiagramm.xls").SmallScroll Down:=6
ActiveChart.SeriesCollection(3).ErrorBars.Select
With Selection.Border
.LineStyle = xlContinuous
.ColorIndex = 3
.Weight = xlMedium
End With
Selection.EndStyle = xlNoCap
ActiveChart.SeriesCollection(3).Select
With Selection.Border
.Weight = xlHairline
.LineStyle = xlNone
End With
With Selection
.MarkerBackgroundColorIndex = xlAutomatic
.MarkerForegroundColorIndex = 3
.MarkerStyle = xlDash
.Smooth = False
.MarkerSize = 14
.Shadow = False
End With
ActiveWindow.Visible = False
Windows("Balken im Säulendiagramm.xls").Activate
Range("G24").Select
End Sub
_________________ Gruß
Fred
Es gibt keine reine Wahrheit, aber ebensowenig gibt es einen reinen Irrtum (Friedrich Hebbel, Tagebücher)
|
|
MarkusPehn
Im Profil kannst Du frei den Rang ändern
Verfasst am: 12. Mai 2007, 10:58 Rufname:
|
| |
| Version: (keine Angabe möglich) |
|
vielen dank, auf dem kann ich wirklich super aufbauen,
thx!
markus
|
|
Du kannst Beiträge in dieses Forum schreiben. Du kannst auf Beiträge in diesem Forum antworten. Du kannst deine Beiträge in diesem Forum nicht bearbeiten. Du kannst deine Beiträge in diesem Forum nicht löschen. Du kannst an Umfragen in diesem Forum nicht mitmachen. Du kannst Dateien in diesem Forum nicht posten Du kannst Dateien in diesem Forum herunterladen
|
|
|
|
| Verwandte Themen |
| Forum / Themen |
Antworten |
Autor |
Aufrufe |
Letzter Beitrag |
 |
Excel VBA (Makros): Mit CommonDialog .txt in erste leere zeile einfügen... |
8 |
BATman^v^ |
110 |
19. Mai 2010, 15:31 BATman^v^  |
 |
Excel Formeln: Summenfunktion beim Einfügen neuer Zeilen erweitern |
6 |
Gatling |
620 |
08. Apr 2010, 17:09 Gast  |
 |
Excel Auswertungen: Harte Nuss: Logarithmisch und Doppellogarithmisch Diagramm |
1 |
Gast |
619 |
17. Sep 2009, 14:09 KillyvsCibo  |
 |
Excel Auswertungen: In Säulendiagramm Linie einfügen |
2 |
Strigas |
536 |
28. Aug 2009, 10:27 Strigas  |
 |
Excel VBA (Makros): Punkte mit Pfeilen verbinden im Diagramm |
3 |
ReinekeFuchs |
512 |
25. Jul 2009, 20:08 ReinekeFuchs  |
 |
Excel VBA (Makros): 4. bedingte formatierung einfügen (Array) |
5 |
rikkscha |
617 |
17. Jun 2009, 15:21 Odwin  |
 |
Excel Auswertungen: Diagramm- Rubrikenachse Daten aus 2 Zellen |
3 |
bullitt |
815 |
27. Jan 2009, 13:47 Alto  |
 |
Excel VBA (Makros): Datei-Link per Makro in Zelle einfügen |
2 |
Hochsauerländer |
1026 |
17. Dez 2008, 21:43 Hochsauerländer  |
 |
Excel Formeln: Excel Tabelle bei Eingabe neu einfügen |
1 |
Lao |
102 |
05. Sep 2008, 13:02 Smartie256  |
 |
Excel VBA (Makros): Nur die bestimmte Stellen einer zelle kopieren und einfügen |
7 |
Gast |
631 |
15. Apr 2008, 11:58 Jessi08  |
 |
Excel Auswertungen: Projektplan als Diagramm |
5 |
peterchen1 |
3160 |
31. März 2008, 19:33 peterchen1  |
 |
Excel Hilfe: automatische Zeile einfügen trotz Blattschutz |
1 |
Rathino |
1214 |
11. Jan 2008, 15:18 Gast  |
| |
|