Formuléierung vum Problem
Ech hätt gär datt d'Säulen am Histogramm (oder Scheiwen op der Pie-Diagramm, etc.) automatesch d'Faarf hunn déi benotzt gouf fir déi entspriechend Zellen mat de Quelldaten ze fëllen:
Erwaardung op déi iwwerrascht an indignéiert Gejäiz vun eenzelne Komeroden, et sollt bemierkt datt natierlech d'Faarf vum Fëllement am Diagramm och manuell geännert ka ginn (riets klickt op d'Kolonn - Punkt / Serie Format (Datepunkt/Serie formatéieren) asw - kee streit. Awer an der Praxis ginn et vill Situatiounen, wann et méi einfach a méi bequem ass dëst direkt an den Zellen mat Daten ze maachen, an da soll d'Diagramm dann automatesch nei gemoolt ginn. Probéiert zum Beispill d'Fëllung no Regioun fir d'Säulen an dësem Diagramm ze setzen:
Ech mengen Dir kritt d'Iddi, richteg?
Léisung
Näischt wéi e Makro kann dat maachen. Dofir maache mir op Visual Basic Editor vum Tab Entwéckler (Entwéckler - Visual Basic Editor) oder dréckt d'Tastatur Ofkiirzung Alt + F11, setzen en neien eidele Modul duerch de Menü Insert - Modul a kopéiert den Text vun esou engem Makro do, deen all d'Aarbecht wäert maachen:
Sub SetChartColorsFromDataCells() If TypeName(Selection) <> "ChartArea" Then MsgBox "Сначала выделите диаграмму!" Exit Sub End Wann Set c = ActiveChart Fir j = 1 To c.SeriesCollection.Count f = c.SeriesCollection(j).Formel m = Split(f, ",") Set r = Range(m(2)) Fir i = 1 To r.Cells.Count c.SeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = _ r.Cells(i).Interior.Color Next i Next j End Sub
Dir kënnt elo Visual Basic zoumaachen an zréck op Excel. Den erstallten Makro benotzen ass ganz einfach. Wielt d'Diagramm (Kaartberäich, net Plotberäich, Gitter oder Kolonnen!):
a lafen eise Macro mam Knäppchen macros Reiter Entwéckler (Entwéckler - Macros) oder mat enger Tastatur Ofkiirzung Alt + F8. An der selwechter Fënster, am Fall vu häufiger Benotzung, kënnt Dir eng Tastatur Ofkiirzung un de Macro mat dem Knäppchen zouginn Parameteren (Optiounen).
PS
Déi eenzeg fléien an der Sallef ass d'Onméiglechkeet eng ähnlech Funktioun ze benotzen fir Fäll wou d'Faarf un d'Zellen vun de Quelldaten zougewisen ass mat bedingungsfäeg Formatéierungsregelen. Leider huet Visual Basic keen agebaute Tool fir dës Faarwen ze liesen. Et gi selbstverständlech gewësse "Krütchen", awer si funktionnéieren net fir all Fäll an net an all Versiounen.
- Wat sinn Makroen, wéi se se benotzen, wou Dir Makrocode an Visual Basic setzt
- Bedingend Formatéierung an Excel 2007-2013
- Wat ass Neit an Charts an Excel 2013