సెల్ నుండి దాని డేటాతో చార్ట్ యొక్క రంగు

సమస్య యొక్క సూత్రీకరణ

హిస్టోగ్రామ్‌లోని నిలువు వరుసలు (లేదా పై చార్ట్‌లోని స్లైస్‌లు మొదలైనవి) స్వయంచాలకంగా మూల డేటాతో సంబంధిత సెల్‌లను పూరించడానికి ఉపయోగించే రంగును కలిగి ఉండాలని నేను కోరుకుంటున్నాను:

వ్యక్తిగత సహచరుల ఆశ్చర్యకరమైన మరియు కోపంతో కూడిన కేకలు ఊహించి, రేఖాచిత్రంలోని పూరక రంగును కూడా మానవీయంగా మార్చవచ్చని గమనించాలి (కాలమ్‌పై కుడి క్లిక్ చేయండి - పాయింట్/సిరీస్ ఫార్మాట్ (డేటా పాయింట్/సిరీస్‌ను ఫార్మాట్ చేయండి) మొదలైనవి - ఎవరూ వాదించరు. కానీ ఆచరణలో, డేటాతో నేరుగా సెల్‌లలో దీన్ని చేయడం సులభం మరియు మరింత సౌకర్యవంతంగా ఉన్నప్పుడు చాలా సందర్భాలు ఉన్నాయి, ఆపై చార్ట్ స్వయంచాలకంగా పెయింట్ చేయాలి. ఉదాహరణకు, ఈ చార్ట్‌లోని నిలువు వరుసల కోసం ప్రాంతం వారీగా పూరించడాన్ని సెట్ చేయడానికి ప్రయత్నించండి:

మీకు ఆలోచన వచ్చిందని నేను అనుకుంటున్నాను, సరియైనదా?

సొల్యూషన్

స్థూల తప్ప మరేదీ దీన్ని చేయదు. అందువలన, మేము తెరుస్తాము విజువల్ బేసిక్ ఎడిటర్ ట్యాబ్ నుండి డెవలపర్ (డెవలపర్ — విజువల్ బేసిక్ ఎడిటర్) లేదా కీబోర్డ్ సత్వరమార్గాన్ని నొక్కండి Alt + F11, మెను ద్వారా కొత్త ఖాళీ మాడ్యూల్‌ని చొప్పించండి చొప్పించు - మాడ్యూల్ మరియు అటువంటి స్థూల వచనాన్ని అక్కడ కాపీ చేయండి, ఇది అన్ని పనిని చేస్తుంది:

Sub SetChartColorsFromDataCells() TypeName(ఎంపిక) <> "ChartArea" ఆపై MsgBox "సునాచాలా వీడియో!" j = 1 నుండి c.SeriesCollection వరకు c = ActiveChart సెట్ అయితే ఉప ముగింపు నుండి నిష్క్రమించండి.కౌంట్ f = c.SeriesCollection(j).ఫార్ములా m = స్ప్లిట్(f, ",") సెట్ r = పరిధి(m(2)) i కోసం = 1 నుండి r.Cells.కౌంట్ c.SeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = _ r.Cells(i).Interior.Color Next i Next j End Sub  

మీరు ఇప్పుడు విజువల్ బేసిక్‌ని మూసివేసి, ఎక్సెల్‌కి తిరిగి రావచ్చు. సృష్టించిన మాక్రోను ఉపయోగించడం చాలా సులభం. చార్ట్‌ను ఎంచుకోండి (చార్ట్ ప్రాంతం, ప్లాట్ ఏరియా, గ్రిడ్ లేదా నిలువు వరుసలు కాదు!):

మరియు బటన్‌తో మా స్థూలాన్ని అమలు చేయండి macros టాబ్ డెవలపర్ (డెవలపర్ - మాక్రోలు) లేదా కీబోర్డ్ సత్వరమార్గంతో Alt + F8. అదే విండోలో, తరచుగా ఉపయోగించే సందర్భంలో, మీరు బటన్‌ను ఉపయోగించి మాక్రోకు కీబోర్డ్ సత్వరమార్గాన్ని కేటాయించవచ్చు పారామీటర్లు (ఐచ్ఛికాలు).

PS

షరతులతో కూడిన ఫార్మాటింగ్ నియమాలను ఉపయోగించి మూలం డేటా యొక్క కణాలకు రంగు కేటాయించబడిన సందర్భాల్లో ఇదే విధమైన ఫంక్షన్‌ను ఉపయోగించడం అసంభవం. దురదృష్టవశాత్తూ, విజువల్ బేసిక్‌లో ఈ రంగులను చదవడానికి అంతర్నిర్మిత సాధనం లేదు. కొన్ని "క్రచెస్" ఉన్నాయి, కానీ అవి అన్ని సందర్భాలలో పని చేయవు మరియు అన్ని వెర్షన్లలో కాదు.

  • మాక్రోలు అంటే ఏమిటి, వాటిని ఎలా ఉపయోగించాలి, విజువల్ బేసిక్‌లో మాక్రో కోడ్‌ను ఎక్కడ చొప్పించాలి
  • Excel 2007-2013లో షరతులతో కూడిన ఫార్మాటింగ్
  • ఎక్సెల్ 2013లోని చార్ట్‌లలో కొత్తవి ఏమిటి

సమాధానం ఇవ్వూ