Kako barvati grafikon glede na barvo celice v Excelu?
Ko ustvarite grafikon, je običajno privzeta bar stolpca. Če morate na vsaki vrstici formatirati zapolnjeno barvo glede na barve celic, kot je prikazano na spodnjem posnetku zaslona, kako bi to lahko rešili v Excelu?
Grafikon obarvajte z eno ali več podatkovnimi vrstami glede na barvo celice s kodami VBA
Grafikon obarvajte z eno ali več podatkovnimi serijami na podlagi barv celic z neverjetno lastnostjo
Grafikon obarvajte z eno ali več podatkovnimi vrstami glede na barvo celice s kodami VBA
Grafikon obarvajte z eno podatkovno serijo, ki temelji na barvi celice
Z naslednjo kodo VBA lahko hitro spremenite barvo grafikona, ki vsebuje eno podatkovno serijo, ki temelji na barvi izvornih vrednosti celic.
1. Najprej ustvarite stolpčni ali stolpčni grafikon, kot je prikazano na spodnji sliki zaslona (izberite podatke in kliknite Vstavi > Vstavi stolpec ali stolpčni grafikon):
2. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
3. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v okno modula.
Koda VBA: Vrstice barvnih grafikonov z eno serijo podatkov glede na barvo celice:
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
Opombe: V zgornji kodi, Graf 1 je ime grafikona, ki ga želite uporabiti, ga spremenite v svojega.
4. Po lepljenju zgornje kode pritisnite F5 tipko za zagon te kode, barva vrstic grafikona pa je spremenjena glede na prvotno barvo celice, glejte sliko zaslona:
Grafikon obarvajte z več podatkovnimi serijami glede na barvo celice
Če je vaš grafikon z več podatkovnimi serijami, uporabite naslednjo kodo VBA:
1. Ustvarite stolpčni ali stolpčni grafikon, ki vsebuje več podatkovnih serij, kot je prikazano na sliki spodaj:
2. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
3. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v okno modula.
Koda VBA: Vrstice barvnih grafikonov z več podatkovnimi nizi na podlagi barve celice:
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. Nato pritisnite F5 tipko za zagon te kode, vrstice grafikona se napolnijo z izvirno barvo celic hkrati, glejte posnetek zaslona:
Opombe:
1. V zgornji kodi: Graf 1 je ime grafikona, ki ga želite uporabiti, ga spremenite v svojega.
2. To kodo lahko uporabite tudi za črtni grafikon.
Grafikon obarvajte z eno ali več podatkovnimi serijami na podlagi barv celic z neverjetno lastnostjo
Z uporabo zgornjih kod se barve grafikona ne bodo vedno ujemale z barvo celice, zato bom za rešitev te težave predstavil uporabno orodje - Spreminjanje barve grafikona glede na barvo celice of Kutools za Excel, s to priročno funkcijo lahko grafikon hitro in enostavno obarvate glede na barvo celice.
Po namestitvi Kutools za Excel, naredite tako:
1. Najprej vstavite grafikon, ki ga želite uporabiti, nato izberite grafikon in kliknite Kutools > Charts > Orodja za grafikone > Spreminjanje barve grafikona glede na barvo celice, glej posnetek zaslona:
2. Nato se prikaže pozivno okno, kliknite OK gumb.
3. Zdaj je grafikon, ki ste ga izbrali, obarvan glede na barve celic, kot je prikazano spodaj:
Grafikon obarvajte z eno podatkovno serijo, ki temelji na barvi celice
Grafikon obarvajte z več podatkovnimi serijami glede na barvo celice
Prenesite in brezplačno preizkusite Kutools za Excel zdaj!
Več relativnih člankov v grafikonih:
- Ustvarite stolpčni grafikon, ki v Excelu prekriva še en grafikon
- Ko ustvarimo gručasti stolpčni ali stolpčni grafikon z dvema nizoma podatkov, se bosta vrstici podatkovnih nizov prikazali drug ob drugem. Včasih pa moramo za jasnejšo primerjavo obeh podatkovnih vrst uporabiti prekrivni ali prekrivajoči se stolpčni grafikon. V tem članku bom govoril o tem, kako v Excelu ustvariti prekrivajoči se stolpčni grafikon.
- Kopirajte eno obliko grafikona drugim v Excel
- Recimo, da je na vašem delovnem listu več različnih vrst grafikonov, ste oblikovali en grafikon po svojih željah in zdaj želite to oblikovanje grafikona uporabiti na drugih grafikonih. Seveda lahko druge ročno formatirate druge, vendar boste s tem izgubili veliko časa, ali obstajajo hitri ali priročni načini za kopiranje ene oblike grafikona v druge v Excelu?
- Na grafikonu označite največje in najmanjše podatkovne točke
- Če imate stolpčni grafikon, v katerem želite označiti najvišje ali najmanjše podatkovne točke z različnimi barvami, da jih premagate, kot je prikazano na sliki spodaj. Kako bi lahko prepoznali najvišjo in najmanjšo vrednost in nato hitro označili podatkovne točke na grafikonu?
- Ustvari grafikon korakov v Excelu
- Tabela korakov se uporablja za prikaz sprememb, ki so se zgodile v nepravilnih intervalih, je razširjena različica črtnega grafikona. Vendar v Excelu ni neposrednega načina, da bi ga ustvarili. V tem članku bom govoril o tem, kako v Excelovem delovnem listu korak za korakom ustvariti grafikon korakov.
- Ustvari vrstni grafikon napredka v Excelu
- V Excelu vam lahko stolpčni grafikon napredka pomaga spremljati napredek proti cilju, kot je prikazano na spodnji sliki zaslona. Kako pa lahko na Excelovem delovnem listu ustvarite stolpčni grafikon napredka?
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!