Wie färben Sie Diagramme basierend auf der Zellenfarbe in Excel?
Normalerweise ist beim Erstellen eines Diagramms die Farbe der Spaltenleiste die Standardeinstellung. Wenn Sie die gefüllte Farbe für jeden Balken basierend auf den Zellenfarben wie im folgenden Screenshot formatieren müssen, wie können Sie dies in Excel lösen?
Färben Sie das Diagramm mit einer oder mehreren Datenreihen basierend auf der Zellenfarbe mit VBA-Codes
Färben Sie das Diagramm mit einer Datenreihe basierend auf der Zellenfarbe
Mit dem folgenden VBA-Code können Sie die Farbe des Diagramms, das eine Datenreihe enthält, basierend auf der ursprünglichen Farbe der Zellenwerte schnell ändern. Gehen Sie dazu folgendermaßen vor:
1. Erstellen Sie zunächst ein Balken- oder Säulendiagramm wie im folgenden Screenshot (Daten auswählen und klicken Insert > Spalten- oder Balkendiagramm einfügen):
2. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
3. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Modulfenster ein.
VBA-Code: Farbkartenleisten mit einer Datenreihe basierend auf der Zellenfarbe:
Sub ColorChartColumnsbyCellColor()
'Updateby Extendoffice
Dim xChart As Chart
Dim I As Long, xRows As Long
Dim xRg As Range, xCell As Range
On Error Resume Next
Set xChart = ActiveSheet.ChartObjects("Chart 1").Chart
If xChart Is Nothing Then Exit Sub
With xChart.SeriesCollection(1)
Set xRg = ActiveSheet.Range(Split(Split(.Formula, ",")(1), "!")(1))
xRows = xRg.Rows.Count
Set xRg = xRg(1)
For I = 1 To xRows
.Points(I).Format.Fill.ForeColor.RGB = ThisWorkbook.Colors(xRg.Offset(I - 1, 0).Interior.ColorIndex)
Next
End With
End Sub
Note: Im obigen Code, Diagramm 1 Ist der Diagrammname, den Sie verwenden möchten, ändern Sie ihn bitte in Ihren eigenen.
4. Nachdem Sie den obigen Code eingefügt haben, drücken Sie bitte F5 Taste, um diesen Code auszuführen, und die Farbe der Diagrammleisten wurde basierend auf der ursprünglichen Zellenfarbe geändert, siehe Screenshot:
Färben Sie das Diagramm mit mehreren Datenreihen basierend auf der Zellenfarbe
Wenn Ihr Diagramm mehrere Datenreihen enthält, wenden Sie bitte den folgenden VBA-Code an:
1. Bitte erstellen Sie das Balken- oder Säulendiagramm, das mehrere Datenreihen enthält, wie im folgenden Screenshot gezeigt:
2. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
3. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Modulfenster ein.
VBA-Code: Farbkartenleisten mit mehreren Datenreihen basierend auf der Zellenfarbe:
Sub CellColorsToChart()
'Updateby Extendoffice
Dim xChart As Chart
Dim I As Long, J As Long
Dim xRowsOrCols As Long, xSCount As Long
Dim xRg As Range, xCell As Range
On Error Resume Next
Set xChart = ActiveSheet.ChartObjects("Chart 1").Chart
If xChart Is Nothing Then Exit Sub
xSCount = xChart.SeriesCollection.Count
For I = 1 To xSCount
J = 1
With xChart.SeriesCollection(I)
Set xRg = ActiveSheet.Range(Split(Split(.Formula, ",")(2), "!")(1))
If xSCount > 4 Then
xRowsOrCols = xRg.Columns.Count
Else
xRowsOrCols = xRg.Rows.Count
End If
For Each xCell In xRg
.Points(J).Format.Fill.ForeColor.RGB = ThisWorkbook.Colors(xCell.Interior.ColorIndex)
.Points(J).Format.Line.ForeColor.RGB = ThisWorkbook.Colors(xCell.Interior.ColorIndex)
J = J + 1
Next
End With
Next
End Sub
4. Dann drücken F5 Mit der Taste zum Ausführen dieses Codes werden die Diagrammleisten sofort mit der ursprünglichen Zellenfarbe gefüllt, siehe Screenshot:
Anmerkungen:
1. Im obigen Code Diagramm 1 Ist der Diagrammname, den Sie verwenden möchten, ändern Sie ihn bitte in Ihren eigenen.
2. Dieser Code kann auch auf ein Liniendiagramm angewendet werden.
Färben Sie das Diagramm mit einer oder mehreren Datenreihen basierend auf der Zellenfarbe mit einer erstaunlichen Funktion
Wenn Sie die obigen Codes verwenden, werden die Farben des Diagramms nicht immer mit der Zellenfarbe abgeglichen. Um dieses Problem zu lösen, stelle ich hier ein nützliches Werkzeug vor: Ändern Sie die Diagrammfarbe entsprechend der Zellenfarbe of Kutools for ExcelMit dieser praktischen Funktion können Sie das Diagramm schnell und einfach anhand der Zellenfarbe ausmalen.
Nach der Installation Kutools for ExcelBitte machen Sie Folgendes:
1. Fügen Sie zuerst das Diagramm ein, das Sie verwenden möchten, und wählen Sie dann das Diagramm aus. Klicken Sie dann auf Kutoolen > Charts > Diagrammwerkzeuge > Ändern Sie die Diagrammfarbe entsprechend der Zellenfarbe, siehe Screenshot:
2. Und dann erscheint eine Eingabeaufforderung, klicken Sie bitte OK .
3. Das von Ihnen ausgewählte Diagramm wurde nun basierend auf den Zellenfarben wie in den folgenden Screenshots gefärbt:
Färben Sie das Diagramm mit einer Datenreihe basierend auf der Zellenfarbe
Färben Sie das Diagramm mit mehreren Datenreihen basierend auf der Zellenfarbe
Laden Sie Kutools for Excel jetzt herunter und testen Sie es kostenlos!
Weitere relative Diagrammartikel:
- Erstellen eines Balkendiagramms über einem anderen Balkendiagramm in Excel
- Wenn wir einen gruppierten Balken oder ein Säulendiagramm mit zwei Datenreihen erstellen, werden die beiden Datenreihenbalken nebeneinander angezeigt. Manchmal müssen wir jedoch die Überlagerung oder das überlappende Balkendiagramm verwenden, um die beiden Datenreihen klarer zu vergleichen. In diesem Artikel werde ich darüber sprechen, wie ein überlappendes Balkendiagramm in Excel erstellt wird.
- Kopieren Sie ein Diagrammformat in Excel in andere
- Angenommen, Ihr Arbeitsblatt enthält mehrere verschiedene Diagrammtypen. Sie haben ein Diagramm nach Ihren Wünschen formatiert und möchten diese Diagrammformatierung nun auf andere Diagramme anwenden. Natürlich können Sie andere manuell einzeln formatieren, aber dies verschwendet viel Zeit. Gibt es schnelle oder praktische Möglichkeiten, ein Diagrammformat in Excel in andere zu kopieren?
- Markieren Sie die maximalen und minimalen Datenpunkte in einem Diagramm
- Wenn Sie ein Säulendiagramm haben, in dem Sie die höchsten oder kleinsten Datenpunkte mit unterschiedlichen Farben hervorheben möchten, um sie hervorzuheben, wie im folgenden Screenshot gezeigt. Wie können Sie die höchsten und kleinsten Werte identifizieren und dann die Datenpunkte im Diagramm schnell hervorheben?
- Erstellen Sie ein Schrittdiagramm in Excel
- Ein Schrittdiagramm zeigt die Änderungen in unregelmäßigen Abständen an. Es handelt sich um eine erweiterte Version eines Liniendiagramms. Es gibt jedoch keine direkte Möglichkeit, es in Excel zu erstellen. In diesem Artikel werde ich Schritt für Schritt erläutern, wie Sie im Excel-Arbeitsblatt ein Schrittdiagramm erstellen.
- Erstellen eines Fortschrittsbalkendiagramms in Excel
- In Excel können Sie mithilfe des Fortschrittsbalkendiagramms den Fortschritt in Richtung eines Ziels überwachen, wie im folgenden Screenshot gezeigt. Aber wie können Sie ein Fortschrittsbalkendiagramm im Excel-Arbeitsblatt erstellen?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
