Yacheykalardan olingan diagramma rangi, uning ma'lumotlari

Muammoni shakllantirish

Men gistogrammadagi ustunlar (yoki doiraviy diagrammadagi bo'laklar va boshqalar) avtomatik ravishda tegishli hujayralarni manba ma'lumotlari bilan to'ldirish uchun ishlatiladigan rangga ega bo'lishini xohlayman:

Alohida o'rtoqlarning hayratlanarli va g'azablangan qichqiriqlarini kutar ekanmiz, shuni ta'kidlash kerakki, albatta, diagrammadagi to'ldirish rangini qo'lda ham o'zgartirish mumkin (ustunni o'ng tugmasini bosing - Nuqta/seriya formati (Ma'lumotlar nuqtasi/seriyasini formatlash) va hokazo - hech kim bahslashmaydi. Ammo amalda, buni to'g'ridan-to'g'ri ma'lumotlarga ega bo'lgan hujayralarda qilish osonroq va qulayroq bo'lgan holatlar juda ko'p, keyin diagramma avtomatik ravishda qayta bo'yalgan bo'lishi kerak. Misol uchun, ushbu diagrammadagi ustunlar uchun mintaqa bo'yicha to'ldirishni o'rnatishga harakat qiling:

Menimcha, siz bu fikrni tushundingiz, to'g'rimi?

qaror

Buni makrosdan boshqa hech narsa qila olmaydi. Shuning uchun biz ochamiz Visual Basic muharriri tabdan dasturchi (Dasturchi — Visual Basic muharriri) yoki klaviatura yorliqlarini bosing Alt + F11, menyu orqali yangi bo'sh modulni joylashtiring Qo'shish - modul va u erda barcha ishlarni bajaradigan bunday makrosning matnini ko'chiring:

Sub SetChartColorsFromDataCells() Agar TypeName(Selection) <> "ChartArea" Keyin MsgBox "Snachala vydelite diagrammu!" Chiqish Sub End Agar o'rnatilgan c = ActiveChart j = 1 uchun c.SeriesCollection.Count f = c.SeriesCollection(j).Formula m = Split(f, ",") Set r = Range(m(2)) i uchun = 1 To r.Cells.Count c.SeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = _ r.Cells(i).Interior.Color Next i Next j End Sub  

Endi siz Visual Basic dasturini yopishingiz va Excelga qaytishingiz mumkin. Yaratilgan makrosdan foydalanish juda oddiy. Diagrammani tanlang (diagramma maydoni, chizma maydoni, panjara yoki ustunlar emas!):

va tugma bilan makromizni ishga tushiring macros tab dasturchi (Dasturchi — Makroslar) yoki klaviatura yorlig'i bilan Alt + F8. Xuddi shu oynada, tez-tez foydalanilganda, tugma yordamida makrosga klaviatura yorlig'ini belgilashingiz mumkin Parameters (Tanlovlar).

PS

Malhamdagi yagona chivin - shartli formatlash qoidalaridan foydalangan holda rang manba ma'lumotlarining hujayralariga tayinlangan holatlar uchun shunga o'xshash funktsiyadan foydalanishning mumkin emasligi. Afsuski, Visual Basic-da bu ranglarni o'qish uchun o'rnatilgan vosita yo'q. Albatta, ma'lum "tayoqchalar" mavjud, ammo ular barcha holatlar uchun ishlamaydi va barcha versiyalarda emas.

  • Makroslar nima, ulardan qanday foydalanish kerak, Visual Basic dasturida makro kodni qayerga kiritish kerak
  • Excel 2007-2013 da shartli formatlash
  • Excel 2013-dagi Grafiklardagi yangiliklar

Leave a Reply