Ngjyra e një grafiku nga qelizat me të dhënat e tij

Formulimi i problemit

Do të doja që kolonat në histogram (ose feta në grafikun e byrekëve, etj.) të kishin automatikisht ngjyrën që u përdor për të mbushur qelizat përkatëse me të dhënat burimore:

Duke parashikuar thirrjet e befasuara dhe të indinjuara të shokëve individualë, duhet të theksohet se, natyrisht, ngjyra e mbushjes në diagram mund të ndryshohet edhe me dorë (kliko me të djathtën në kolonë - Formati i pikës/serisë (Formatoni pikën/serinë e të dhënave) etj – askush nuk debaton. Por në praktikë, ka shumë situata kur është më e lehtë dhe më e përshtatshme për ta bërë këtë drejtpërdrejt në qelizat me të dhëna, dhe më pas grafiku duhet të rilyhet automatikisht. Provoni, për shembull, të vendosni mbushjen sipas rajonit për kolonat në këtë grafik:

Mendoj se e keni idenë, apo jo?

Zgjidhje

Asgjë përveç një makro nuk mund ta bëjë këtë. Prandaj, ne hapemi Redaktori i Visual Basic nga skeda zhvillues (Zhvilluesi - Redaktori i Visual Basic) ose shtypni shkurtoren e tastierës Alt + F11, futni një modul të ri bosh përmes menysë Insert – Moduli dhe kopjoni tekstin e një makro të tillë atje, i cili do të bëjë të gjithë punën:

Nën SetChartColorsFromDataCells() If TypeName(Selection) <> "ChartArea" Pastaj MsgBox "Snachala vыdelite diagrammu!" Dilni në fund nëse grupi c = Active Chart Për j = 1 Në c.SeriesCollection.Numërimi f = c.SeriesCollection(j).Formula m = Split(f, ",") Set r = Range(m(2)) Për i = 1 Tek r.Qelizat.Numri c.Seria Koleksion(j).Pikat(i).Format.Fill.ForeColor.RGB = _ r.Qelizat(i).Interior.Ngjyra Tjetër i Tjetër j Fundi Nën  

Tani mund të mbyllni Visual Basic dhe të ktheheni në Excel. Përdorimi i makros së krijuar është shumë i thjeshtë. Zgjidhni grafikun (zonën e grafikut, jo zonën e grafikut, rrjetën ose kolonat!):

dhe ekzekutoni makro tonë me butonin macros tab zhvillues (Zhvilluesi - Makro) ose me një shkurtore të tastierës Alt + F8. Në të njëjtën dritare, në rast përdorimi të shpeshtë, mund të caktoni një shkurtore të tastierës në makro duke përdorur butonin Parameters (Opsione).

PS

Miza e vetme në vaj është pamundësia e përdorimit të një funksioni të ngjashëm për rastet kur ngjyra u caktohet qelizave të të dhënave burimore duke përdorur rregulla të formatimit të kushtëzuar. Fatkeqësisht, Visual Basic nuk ka një mjet të integruar për leximin e këtyre ngjyrave. Ka, sigurisht, disa "paterica", por ato nuk funksionojnë për të gjitha rastet dhe jo në të gjitha versionet.

  • Çfarë janë makro, si t'i përdorim ato, ku të futni kodin makro në Visual Basic
  • Formatimi i kushtëzuar në Excel 2007-2013
  • Çfarë ka të re në grafikët në Excel 2013

Lini një Përgjigju