contents
Fòmasyon pwoblèm nan
Mwen ta renmen kolòn yo sou istogram la (oswa tranch sou tablo tat la, elatriye) otomatikman gen koulè ki te itilize pou ranpli selil korespondan yo ak done sous yo:
Antisipe rèl yo sezi ak endiye nan kamarad endividyèl yo, li ta dwe remake ke, nan kou, koulè a nan ranpli a nan dyagram nan ka chanje tou manyèlman (dwa-klike sou kolòn nan - Fòma pwen/seri (Fòma pwen done/seri) elatriye - pèsonn pa diskite. Men, nan pratik, gen yon anpil nan sitiyasyon lè li pi fasil ak pi pratik fè sa dirèkteman nan selil yo ak done, ak Lè sa a, tablo a ta dwe repentire otomatikman. Eseye, pou egzanp, mete ranpli a pa rejyon pou kolòn yo nan tablo sa a:
Mwen panse ke ou jwenn lide a, dwa?
Solisyon
Pa gen anyen men yon macro ka fè sa. Se poutèt sa, nou louvri Editè Visual Basic soti nan tab la pwomotè (Devlopè — Editè debaz vizyèl) oswa peze rakoursi klavye a Alt + F11, mete yon nouvo modil vid nan meni an Mete – Modil epi kopye tèks la nan yon makro konsa, ki pral fè tout travay la:
Sub SetChartColorsFromDataCells() If TypeName(Seleksyon) <> "ChartArea" Lè sa a, MsgBox "Сначала выделите диаграмму!" Sòti Sub End Si Mete c = ActiveChart Pou j = 1 Pou c.SeriesCollection.Count f = c.SeriesCollection(j).Fòmil m = Split(f, ",") Mete r = Range(m(2)) Pou i = 1 Pou r.Cells.Count c.SeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = _ r.Cells(i).Interior.Color Next i Next j End Sub
Ou kapab kounye a fèmen Visual Basic epi retounen nan Excel. Sèvi ak makro a kreye se trè senp. Chwazi tablo a (zòn tablo, pa zòn trase, kadriyaj oswa kolòn!):
epi kouri makro nou an ak bouton an Makro tab pwomotè (Devlopè — Macro) oswa avèk yon chemen kout klavye Alt + F8. Nan menm fenèt la, nan ka itilize souvan, ou ka bay yon rakoursi klavye nan makro a lè l sèvi avèk bouton an paramèt (Opsyon).
PS
Sèl vole nan odè a se enposib pou sèvi ak yon fonksyon menm jan an pou ka kote koulè a asiyen nan selil yo nan done yo sous lè l sèvi avèk règ fòma kondisyonèl. Malerezman, Visual Basic pa gen yon zouti entegre pou li koulè sa yo. Gen, nan kou, sèten "beki", men yo pa travay pou tout ka yo epi yo pa nan tout vèsyon.
- Ki sa ki makro, ki jan yo sèvi ak yo, ki kote yo mete kòd macro nan Visual Basic
- Fòma kondisyonèl nan Excel 2007-2013
- Ki sa ki nouvo nan tablo nan Excel 2013