ان جي ڊيٽا سان سيلز مان هڪ چارٽ جو رنگ

مسئلي جي جوڙجڪ

مان چاهيان ٿو ته هسٽوگرام تي ڪالمن (يا پائي چارٽ تي سلائسون وغيره) پاڻمرادو رنگ هجي جيڪو لاڳاپيل سيلن کي ماخذ ڊيٽا سان ڀرڻ لاءِ استعمال ڪيو ويو:

انفرادي ڪامريڊن جي حيران ڪندڙ ۽ ڪاوڙيل روئڻ جي اڳڪٿي ڪندي، اهو ياد رکڻ گهرجي ته، يقينا، ڊراگرام ۾ ڀرڻ جو رنگ پڻ دستي طور تي تبديل ڪري سگهجي ٿو (ڪالمن تي صحيح ڪلڪ ڪريو - پوائنٽ / سيريز فارميٽ (ڊيٽا پوائنٽ / سيريز فارميٽ) وغيره - ڪو به بحث نٿو ڪري. پر عملي طور تي، اتي ڪيتريون ئي حالتون آهن جڏهن اهو آسان ۽ وڌيڪ آسان آهي اهو سڌو سنئون سيلز ۾ ڊيٽا سان، ۽ پوء چارٽ کي خودڪار طريقي سان ٻيهر رنگ ڪيو وڃي. ڪوشش ڪريو، مثال طور، ھن چارٽ ۾ ڪالمن لاءِ علائقي جي لحاظ کان ڀرڻ لاءِ:

مان سمجهان ٿو ته توهان اهو خيال حاصل ڪيو، صحيح؟

حل

ڪجھ به نه پر هڪ ميڪرو اهو ڪري سگهي ٿو. تنهن ڪري، اسان کليل آهيون بصري بنيادي ايڊيٽر ٽيب مان ڊولپر (ڊولپر - بصري بنيادي ايڊيٽر) يا ڪي بورڊ شارٽ ڪٽ کي دٻايو Alt + F11، مينيو ذريعي نئون خالي ماڊل داخل ڪريو داخل ڪريو - ماڊل ۽ اتي اهڙي ميڪرو جو متن نقل ڪريو، جيڪو سڄو ڪم ڪندو:

Sub SetChartColorsFromDataCells() If TypeName(Selection) <> "ChartArea" پوءِ MsgBox "Snachala выделите диаграмму!" ختم ڪريو ذيلي آخر جيڪڏھن سيٽ ڪريو c = ActiveChart لاءِ j = 1 تائين. = 2 تائين r.Cells.Count c.SeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = _ r.Cells(i).Interior.Color اڳيان ۽ اگلا j آخر سب  

توھان ھاڻي بند ڪري سگھوٿا Visual Basic ۽ واپسي Excel ڏانھن. ٺاھيل ميڪرو استعمال ڪرڻ بلڪل سادو آھي. چارٽ چونڊيو (چارٽ جو علائقو، نه پلاٽ علائقو، گرڊ يا ڪالمن!):

۽ بٽڻ سان اسان جي ميڪرو کي هلايو ميڪورس ٽئب ڊولپر (ڊولپر - ميڪروس) يا ڪي بورڊ شارٽ ڪٽ سان Alt + F8. ساڳئي ونڊو ۾، بار بار استعمال جي صورت ۾، توهان بٽڻ کي استعمال ڪندي ميڪرو کي ڪيبورڊ شارٽ ڪٽ تفويض ڪري سگهو ٿا جي پيراميٽر (اختيارن).

PS

عطر ۾ صرف مکڻ اهو ناممڪن آهي ته ساڳئي فنڪشن کي استعمال ڪرڻ لاء ڪيسن ۾ جتي رنگ کي مقرر ڪيو ويو آهي ماخذ ڊيٽا جي سيلز کي مشروط فارميٽنگ ضابطن کي استعمال ڪندي. بدقسمتي سان، Visual Basic وٽ انهن رنگن کي پڙهڻ لاءِ هڪ ٺهيل اوزار ناهي. اتي، يقينا، ڪجهه "ڪيچ" آهن، پر اهي سڀني ڪيسن لاء ڪم نه ڪندا آهن ۽ نه سڀني نسخن ۾.

  • ميڪرو ڇا آهن، انهن کي ڪيئن استعمال ڪجي، Visual Basic ۾ ميڪرو ڪوڊ ڪٿي داخل ڪجي
  • ايڪسل 2007-2013 ۾ مشروط فارميٽنگ
  • Excel 2013 ۾ چارٽس ۾ نئون ڇا آھي

جواب ڇڏي وڃو