Բջիջներից գծապատկերի գույնը՝ իր տվյալներով

Խնդրի ձևակերպում

Ես կցանկանայի, որ հիստոգրամի սյունակները (կամ կարկանդակ գծապատկերի հատվածները և այլն) ավտոմատ կերպով ունենան այն գույնը, որն օգտագործվել է համապատասխան բջիջները աղբյուրի տվյալներով լրացնելու համար.

Ակնկալելով առանձին ընկերների զարմացած և վրդովված բացականչությունները, հարկ է նշել, որ, իհարկե, դիագրամի լրացման գույնը կարող է փոխվել նաև ձեռքով (սյունակի վրա սեղմեք աջ. Կետ/շարքի ձևաչափ (Ձևաչափել տվյալների կետը/շարքը) և այլն – ոչ ոք չի վիճում: Բայց գործնականում կան շատ իրավիճակներ, երբ ավելի հեշտ և հարմար է դա անել անմիջապես բջիջներում տվյալների հետ, և այնուհետև աղյուսակը պետք է ինքնաբերաբար վերաներկվի: Փորձեք, օրինակ, սահմանել լրացումն ըստ տարածաշրջանի այս գծապատկերի սյունակների համար.

Կարծում եմ՝ հասկացաք, չէ՞։

լուծում

Ոչինչ, բացի մակրոյից, դա չի կարող անել: Հետեւաբար, մենք բացում ենք Visual Basic խմբագիր ներդիրից երեվակիչ (Մշակող — Visual Basic խմբագիր) կամ սեղմեք ստեղնաշարի դյուրանցումը Alt + F11, ցանկի միջոցով տեղադրեք նոր դատարկ մոդուլ Ներդիր – մոդուլ և այնտեղ պատճենեք այդպիսի մակրոյի տեքստը, որը կկատարի ամբողջ աշխատանքը.

Sub SetChartColorsFromDataCells() If TypeName(Selection) <> "ChartArea" Ապա MsgBox "Сначала выделите диаграмму!" Ելք Ենթավերջից, եթե Սահմանել c = ActiveChart For j = 1 To c.SeriesCollection.Count f = c.SeriesCollection(j). Բանաձև m = Split(f, ",") Սահմանել r = Range(m(2)) i-ի համար = 1 Դեպի r.Cells.Count c.SeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = _ r.Cells(i).Interior.Color Հաջորդ i Հաջորդը j Վերջ Ենթ.  

Այժմ կարող եք փակել Visual Basic-ը և վերադառնալ Excel: Ստեղծված մակրոյի օգտագործումը շատ պարզ է: Ընտրեք գծապատկերը (գծապատկերի տարածքը, ոչ թե հողամասի տարածքը, ցանցը կամ սյունակները):

և գործարկել մեր մակրոն կոճակով Մակրո ականջակալ երեվակիչ (Մշակող — մակրո) կամ ստեղնաշարի դյուրանցմամբ Alt + F8. Նույն պատուհանում, հաճախակի օգտագործման դեպքում, կոճակի միջոցով կարող եք ստեղնաշարի դյուրանցում նշանակել մակրոյին Պարամետրեր (Ընտրանքներ).

PS

Քսուքի միակ ճանճը նմանատիպ գործառույթ օգտագործելու անհնարինությունն է այն դեպքերում, երբ գույնը վերագրվում է աղբյուրի տվյալների բջիջներին՝ օգտագործելով պայմանական ձևաչափման կանոնները: Ցավոք, Visual Basic-ը չունի ներկառուցված գործիք այս գույները կարդալու համար: Կան, իհարկե, որոշակի «հենակներ», բայց դրանք ոչ բոլոր դեպքերում են գործում և ոչ բոլոր տարբերակներում։

• Ինչ են մակրոները, ինչպես օգտագործել դրանք, որտեղ տեղադրել մակրո կոդը Visual Basic-ում
• Պայմանական ֆորմատավորում Excel-ում 2007-2013 թթ
• Ինչ նորություն կա Excel 2013-ի գծապատկերներում