Анын маалыматтары менен уячалардан алынган диаграмманын түсү

Проблеманы түзүү

Мен гистограммадагы тилкелердин (же тегерек диаграммадагы кесимдердин ж.б.) автоматтык түрдө булак маалыматтары менен тиешелүү уячаларды толтуруу үчүн колдонулган түскө ээ болушун каалайм:

Кээ бир жолдоштордун таң калган жана кыжырданган кыйкырыктарын күтүү менен, албетте, диаграмманы толтуруунун түсүн кол менен да өзгөртүүгө боло тургандыгын белгилей кетүү керек (тилкени оң баскыч менен чыкылдатуу – Почта/серия форматы (Формат маалымат чекити/сериясы) ж.б. – эч ким талашпайт. Бирок практикада муну түз маалыматтары бар уячаларда жасоо оңой жана ыңгайлуу болгон учурлар көп кездешет, андан кийин диаграмма автоматтык түрдө кайра боёлуп кетиши керек. Мисалы, бул диаграммадагы тилкелер үчүн аймак боюнча толтурууну коюп көрүңүз:

Сиз идеяны түшүндүңүз деп ойлойм, туурабы?

чечим

Муну макроодон башка эч нерсе кыла албайт. Ошондуктан биз ачабыз Visual Basic редактору өтмөктөн иштеп (Иштеп чыгуучу — Visual Basic редактору) же баскычтоптун жарлыгын басыңыз Alt + F11, меню аркылуу жаңы бош модулду киргизиңиз Кыстаруу – модуль жана бардык ишти жасай турган макростун текстин көчүрүңүз:

Sub SetChartColorsFromDataCells() If TypeName(Selection) <> "ChartArea" Анда MsgBox "Сначала выделите диаграмму!" Чыгуу Sub End If Set c = ActiveChart For j = 1 to c.SeriesCollection.Count f = c.SeriesCollection(j).Formula m = Бөлүнүү(f, ",") Set r = Range(m(2)) For i = 1 То r.Cells.Count c.SeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = _ r.Cells(i).Interior.Color Next i Next j End Sub  

Эми сиз Visual Basic программасын жаап, Excelге кайтсаңыз болот. Түзүлгөн макросту колдонуу абдан жөнөкөй. Диаграмманы тандаңыз (диаграмманын аймагы, сюжеттик аймак, тор же мамычалар эмес!):

жана биздин макросту баскыч менен иштетиңиз Macros табулатура иштеп (Иштеп чыгуучу — Макрос) же баскычтоптун жарлыгы менен Alt + F8. Ошол эле терезеде, көп колдонулган учурда, баскычты колдонуп, макроско баскычтопту дайындай аласыз параметрлер (Параметрлер).

PS

Майдагы бир гана чымын - бул түсү шарттуу форматтоо эрежелерин колдонуу менен баштапкы маалыматтардын клеткаларына ыйгарылган учурларда окшош функцияны колдонуунун мүмкүн эместиги. Тилекке каршы, Visual Basicте бул түстөрдү окуу үчүн орнотулган курал жок. Албетте, кээ бир "балдактар" бар, бирок алар бардык версияларда эмес, бардык учурларда иштебейт.

  • Макрос деген эмне, аларды кантип колдонуу керек, Visual Basic программасында макрокодду кайда киргизүү керек
  • Excel 2007-2013-жылы шарттуу форматтоо
  • Excel 2013деги Диаграммалардагы жаңылыктар

Таштап Жооп