Mmala oa chate ho tsoa liseleng tse nang le data ea eona

Tlhahiso ea bothata

Ke kopa hore litšiea tse ho histogram (kapa lilae tsa chate ea phae, joalo-joalo) li be le 'mala o neng o sebelisoa ho tlatsa lisele tse tsamaellanang le lintlha tsa mohloli:

Ha re lebelletse lillo tse makatsang le tse halefileng tsa ma-comrade ka bomong, hoa lokela ho hlokomeloa hore, ehlile, 'mala oa ho tlatsa setšoantšong o ka fetoloa ka letsoho (tobetsa ka ho le letona kholomong - Sebopeho sa ntlha/letoto (Sebopeho sa lintlha/letoto) etc. – ha ho motho ea phehang khang. Empa ts'ebetsong, ho na le maemo a mangata ha ho le bonolo ebile ho le bonolo ho etsa sena ka ho toba liseleng tse nang le data, ebe joale chate e lokela ho penta ka mokhoa o ikemetseng. Ka mohlala, leka ho hlophisa ho tlatsa ka libaka bakeng sa likholomo tsa chate ena:

Ke nahana hore o fumana mohopolo, na?

tharollo

Ha ho letho haese macro le ka etsang sena. Ka hona, rea bula Mohlophisi oa Visual Basic ho tswa ho tab Moqapi (Moqapi - Visual Basic Editor) kapa tobetsa konopo ea keyboard Alt + F11, kenya mochine o mocha o se nang letho ka har'a menu Kenya – Mojule 'me u kopitse mongolo oa macro e joalo moo, e tla etsa mosebetsi oohle:

Sub SetChartColorsFromDataCells() Haeba TypeName(Khetho) <> "ChartArea" Ebe MsgBox "Сначала выделите диаграмму!" Tsoa Sub End Haeba Set c = ActiveChart Bakeng sa j = 1 Ho c.SeriesCollection.Count f = c.SeriesCollection(j).Formula m = Arohane(f, ",") Seta r = Range(m(2)) Bakeng sa i = 1 Ho ea ho r.Lisele.Bala c.SeriesCollection(j).Lintlha(i).Format.Tlatsa.ForeColor.RGB = _ r.Lisele(i).Hare.Mmala.E Latelang i Next j End Sub  

Joale u ka koala Visual Basic 'me u khutlela Excel. Ho sebelisa macro e entsoeng ho bonolo haholo. Khetha chate (sebaka sa chate, eseng sebaka sa moralo, keriti kapa likholomo!):

'me u tsamaise macro ea rona ka konopo makhro tab ya Moqapi (Moetsi - Macros) kapa ka tsela e khaoletsang ea keyboard Alt + F8. Fesetereng e le 'ngoe, haeba e sebelisoa khafetsa, u ka abela sekhechana sa keyboard ho macro u sebelisa konopo entsprechen (Dikgetho).

PS

Ntho e le 'ngoe feela e fofang ka setlolo ke ho se khonehe ho sebelisa ts'ebetso e ts'oanang bakeng sa linyeoe moo' mala o abetsoeng lisele tsa data ea mohloli ho sebelisa melao ea ho fomata e nang le maemo. Ka bomalimabe, Visual Basic ha e na sesebelisoa se kenelletsoeng sa ho bala mebala ena. Ha e le hantle, ho na le "lithupa" tse itseng, empa ha li sebetse bakeng sa linyeoe tsohle, eseng liphetolelong tsohle.

  • Li-macros ke eng, u ka li sebelisa joang, moo u ka kenya khoutu ea macro ho Visual Basic
  • Ho Femetha ka Maemo ho Excel 2007-2013
  • Ke eng e Ncha ka lichate ho Excel 2013

Leave a Reply