|
Diagramm Farbabstufung der Balken
|
| Autor |
Nachricht |
Ghost75
Gast
Verfasst am: 29. Dez 2006, 12:34 Rufname:
|
|
| Version: Office XP (2002) |
|
Hallo.
Kurz vor Jahresende habe folgende Fragestellung:
Ich möchte die Ergebnisse einer Mitarbeiterbefragung grafisch aufbereiten. Dabei sollen z.B. Werte über 90% grün dargestellt werden, über 60% bis 89% gelb und Werte kleiber 60% rot. Geht das? Und wenn ja, wie?
Schon einmal Danke im Voraus!
Wünsche allen Forumsteilnehmern einen guten Rutsch ins neue Jahr!
Gruß
|
|
< Peter >
Excel-Moderator, der jeden Tag dazu lernt

Verfasst am: 29. Dez 2006, 12:50 Rufname: Kommt darauf an wer ruft
Wohnort: Das schönste Land in Deutschlands Gaun
|
| |
| Version: Office XP (2002) |
|
Hallo,
schau mal ob dir das hier hilft.
_________________ Gruß
Peter
|
|
Nepumuk
VB / VBA Programmierer

Verfasst am: 29. Dez 2006, 13:05 Rufname: Max
Wohnort: Dusseldoof
|
|
| Version: Office XP (2002) |
|
Hallo Ghost75,
oder ein kleines Makro gefällig:
| Code: | Public Sub prcColoredBeam()
Dim vntArray As Variant
Dim intIndex As Integer
With Tabelle1.ChartObjects(1).Chart.SeriesCollection(1)
vntArray = .Values
For intIndex = LBound(vntArray) To UBound(vntArray)
Select Case vntArray(intIndex)
Case Is > 0.9
.Points(intIndex).Interior.Color = RGB(0, 255, 0)
Case Is < 0.6
.Points(intIndex).Interior.Color = RGB(255, 0, 0)
Case Else
.Points(intIndex).Interior.Color = RGB(255, 255, 0)
End Select
Next
End With
End Sub |
_________________ De fontibus non est disputandum
Gruß
Nepumuk
|
|
Ghost75
Gast
Verfasst am: 29. Dez 2006, 14:22 Rufname:
|
|
| Version: Office XP (2002) |
|
Hallo.
Danke für die schnelle Hilfe! Funktioniert beides!
Gibt es die Möglichkeit, dass die Farben der Balken von einer Farbe in die nächste übergehen? Von rot zu gelb zu grün? Ist kein muss, wäre aber schön, wenn es so eine Möglichkeit geben würde. Habe dies schon bei einigen Präsentationen gesehen.
Gruß
|
|
Nepumuk
VB / VBA Programmierer

Verfasst am: 29. Dez 2006, 15:24 Rufname: Max
Wohnort: Dusseldoof
|
|
| Version: Office XP (2002) |
|
Hallo Ghost75,
nein, das geht nur zweifarbig. Außer du erstellst eine Grafik mit diesem Effekt. Die könnte man dann als Hintergrund laden.
_________________ De fontibus non est disputandum
Gruß
Nepumuk
|
|
Ghost75
Gast
Verfasst am: 29. Dez 2006, 16:03 Rufname:
|
|
| Version: Office XP (2002) |
|
Hallo Nepomuk.
Wie würde das gehen mit den zweifarbig?
Gruß
|
|
Nepumuk
VB / VBA Programmierer

Verfasst am: 29. Dez 2006, 16:22 Rufname: Max
Wohnort: Dusseldoof
|
|
| Version: Office XP (2002) |
|
Hallo Ghost75,
mal ein Beispiel in dem Der mittlere Bereich von rot nach gelb verläuft.
| Code: |
Public Sub prcColoredBeam()
Dim vntArray As Variant
Dim intIndex As Integer
With Tabelle1.ChartObjects(1).Chart.SeriesCollection(1)
vntArray = .Values
For intIndex = LBound(vntArray) To UBound(vntArray)
Select Case vntArray(intIndex)
Case Is > 0.9
.Points(intIndex).Interior.Color = RGB(0, 255, 0)
Case Is < 0.6
.Points(intIndex).Interior.Color = RGB(255, 0, 0)
Case Else
With .Points(intIndex)
.Fill.TwoColorGradient Style:=msoGradientHorizontal, Variant:=1
.Fill.ForeColor.SchemeColor = 6
.Fill.BackColor.SchemeColor = 3
End With
End Select
Next
End With
End Sub |
_________________ De fontibus non est disputandum
Gruß
Nepumuk
|
|
Ghost75
Gast
Verfasst am: 04. Jan 2007, 13:43 Rufname:
|
| |
| Version: Office XP (2002) |
|
Hallo.
Danke für die Antwort!
Gruß und ein frohes neues Jahr
|
|
| Verwandte Themen |
| Forum / Themen |
Antworten |
Autor |
Aufrufe |
Letzter Beitrag |
 |
Excel VBA (Makros): Diagramm erstellen und bearbeiten |
7 |
Enigma228 |
243 |
18. Dez 2009, 19:00 Enigma228  |
 |
Excel VBA (Makros): Diagramm erstellen -VBA MAcro |
3 |
Stefan1976 |
319 |
14. Jul 2009, 15:36 Stefan1976  |
 |
Excel Auswertungen: Linie für Durchschnittswert in Diagramm einfügen |
4 |
SunnySunshine |
3349 |
06. Jul 2009, 11:28 Brockenhalle  |
 |
Excel Auswertungen: Diagramm- Punke auf Skala sehr gut bis schlecht |
5 |
Meike83 |
442 |
02. Jul 2009, 13:38 Zero  |
 |
Excel Formeln: Bezug in Datenquelle beim Diagramm als Formel angeben |
7 |
Wissensdurst |
955 |
15. Apr 2009, 07:09 Heinz Schweigert  |
 |
Excel Auswertungen: Diagramm bei ausgeblendeten Daten leer? |
1 |
bustawulf |
440 |
02. Apr 2009, 12:03 Gast  |
 |
Excel Auswertungen: Landkarte als Diagramm |
2 |
Gast |
944 |
07. Okt 2008, 12:21 Alto  |
 |
Excel Auswertungen: Säulen-/Balkendiagramm ohne Abstand zw. den Balken |
0 |
Simone22 |
1563 |
08. Jul 2008, 22:08 Simone22  |
 |
Excel Formeln: maximale Anzahl an Datenreihen pro Diagramm |
4 |
Gast |
1038 |
24. März 2008, 21:40 Gast  |
 |
Excel Auswertungen: diagramm linear und parabel |
2 |
zebrafisch |
2069 |
08. Jan 2008, 17:30 AndyRhandy  |
 |
Excel Auswertungen: Diagramm mit 2 Y-Achsen |
2 |
Relikt |
3019 |
04. Jun 2007, 09:34 Relikt  |
 |
Excel VBA (Makros): Trendlinie im Diagramm verschieben |
0 |
hil |
939 |
20. Mai 2007, 17:48 hil  |
| |