Šī apmācība parādīs, kā izveidot animētas diagrammas visās Excel versijās: 2007, 2010, 2013, 2016 un 2022.
Animēta Excel diagramma, kas tiek parādīta ekrānā auditorijas acu priekšā, ir spēcīgs, uzmanību piesaistošs veids, kā virzīt savus datus kustībā.
Atšķirībā no statiskām diagrammām, animētas diagrammas sniedz papildu kontekstu jūsu datiem un palīdz identificēt jaunos modeļus. Piemēram, apskatiet animēto līniju diagrammu ar zemāk redzamajiem marķieriem, kas parāda četru valstu (ASV, Ķīnas, Brazīlijas un Turcijas) IKP pēdējo desmitgažu laikā.
Lai gan statiskais ekvivalents neizskatās nekas īpašs vai jauns, animētais efekts ļauj diagrammai pastāstīt jums stāstu, padarot dzīvāku nekustīgos IKP skaitļus.
Šajā soli pa solim, iesācējiem draudzīgā apmācībā jūs uzzināsit, kā to pašu darīt ar saviem datiem, pat ja jūs tikai veicat pirmos soļus programmā Excel.
Darba sākšana
Apsveriet šādu datu tabulu, kurā ir katras valsts IKP rādītāji:
Lai animētu diagrammu, mēs izmantosim vienkāršu VBA makro, kas vienmērīgi attēlo diagrammas vērtības.
Piezīme. Pievienojot darbgrāmatai VBA kodu, noteikti saglabājiet savu darbgrāmatu .xlsm formātā (Microsoft Excel darbgrāmata ar makro), lai iespējotu makro.
Tagad uzloksim piedurknes un ķersimies pie darba.
1. solis: iestatiet palīgu kolonnas.
Lai sāktu, izvērsiet datu tabulu ar papildu palīgu kolonnām, kurās pakāpeniski tiks kopētas faktiskās vērtības, radot animācijas efektu.
Kopējiet to sleju galvenes, kurās ir IKP skaitļi (B2: E2) attiecīgajās šūnās blakus datu tabulai (F2: I2).
Šūnu diapazons ir iezīmēts gaiši sarkanā krāsā (F3: I13) nosaka vietu, kur glabāsim VBA makro izvadi.
Turklāt pievienojiet decimālos atdalītājus iezīmētajam šūnu diapazonam (Sākums> Cipars> Komatu stils).
2. solis: uzzīmējiet tukšu diagrammu.
Kad esat piešķīris vietu palīgu kolonnām, izveidojiet tukšu divdimensiju diagrammu, izmantojot kolonnas (F2: I13) kā tā avota datus:
- Iezīmējiet jebkuru tukšu šūnu.
- Pārslēdzieties uz Ievietot cilni.
- Klikšķis "Ievietot līniju vai apgabala diagrammu.”
- Izvēlieties “Līnija ar marķieriem.”
Kad tas ir izdarīts, mums tagad ir jāsaista tukšā diagramma ar palīgu kolonnu šūnām (F: Es). Ar peles labo pogu noklikšķiniet uz tukšā laukuma un noklikšķiniet uz “Atlasiet Dati.”
Iekš Atlasiet Datu avots dialoglodziņā sadaļā “Leģendu ieraksti (sērija),"Nospiediet"Pievienot”Pogu.
Kad Rediģēt sēriju tiek atvērts dialoglodziņš, izveidojiet četras jaunas datu sērijas, pamatojoties uz palīgu kolonnām (F: Es):
- Priekš "Sērijas nosaukums,”Norādiet galvenes rindas šūnu kolonna ASV (F2).
- Priekš "Sērijas vērtības,”Atlasiet atbilstošo tukšo šūnu diapazonu (F3: F13).
Atkārtojiet to pašu procesu atlikušajām trim kolonnām.
Kad esat izveidojis datu sēriju, importējiet diagrammā horizontālo asu etiķetes.
Lai to izdarītu, sadaļā “Horizontālās (kategorijas) ass etiķetes,"Noklikšķiniet uz"Rediģēt”Pogu.
Iekš Asu etiķetes dialoglodziņā sadaļā “Asu marķējuma diapazons, ”Iezīmējiet asu vērtības (A3: A13).
Šeit ir profesionāls padoms. Ja regulāri pievienojat vai noņemat vienumus datu tabulā, iestatiet dinamiskos diagrammu diapazonus, lai izvairītos no problēmām, kas rodas, ja katru reizi jāmaina avota kods.
Lai to papildinātu, padariet nākotnes līniju diagrammu vēl informatīvāku, pievienojot diagrammas nosaukumu un apzīmējumu:
- Noklikšķiniet uz diagrammas apgabala.
- Dodieties uz Dizains cilni.
- Atlasiet “Pievienot diagrammas elementus.”
- Pievienojiet diagrammas nosaukumu (Diagrammas nosaukums> Virs diagrammas).
- Pievienojiet diagrammas leģendu (Leģenda> Apakšā).
3. solis: ieprogrammējiet VBA, lai izveidotu animētu efektu.
Kad diagrammas avota dati ir iestatīti pareizi, nākamais solis ir rakstīt VBA makro, kas veiks visu netīro darbu jūsu vietā tikai ar vienu klikšķi.
Pirms ienirt sīkumos, pārliecinieties, vai jums ir Lentē tiek parādīta cilne Izstrādātājs. Ja tas ir atspējots, ar peles labo pogu noklikšķiniet uz jebkuras tukšas vietas Lente un izvēlieties "Pielāgojiet lenti”No parādītās izvēlnes.
Iekš Excel opcijas dialoglodziņā, pārbaudiet “Izstrādātājs"Lodziņā un noklikšķiniet uz"LABI.”
To darot, ir pienācis laiks izlaist Excel Kraken - funkciju, kas izceļ izklājlapu pasaulē iespējamo. Ir pienācis laiks atraisīt VBA spēku.
Vispirms atveriet VBA redaktoru:
- Dodieties uz Izstrādātājs cilni.
- Noklikšķiniet uz “Visual Basic”Pogu.
Redaktorā atlasiet Ievietot cilni un izvēlieties "Modulis.”
Kad esat nokopējis šo kodu koda logā:
| 123456789101112131415161718192021222324 | Subanimated_Chart ()'Deklarēt mainīgosConst StartRow tik ilgi = 2Dim LastRow tik ilgiRindu skaita samazināšana tikpat ilgi'Iegūstiet pēdējo datu rinduLastRow = Diapazons ("A" un StartRow) .End (xlDown) .Row'Notīrīt diagrammu un parādīt tukšu diagrammuDiapazons ("F" un StartRow, "I" un LastRow). Skaidrs satursDoEventsApplication.Wait (Tagad + TimeValue ("00: 00: 1"))'Iet cauri katram diagrammas periodamRindas numuram = StartRow To LastRowDoEventsDiapazons ("F" un rindu numurs, "es" un rindu numurs). Vērtība = diapazons ("B" un rindu numurs, "E" un rindu numurs). VērtībaApplication.Wait (Tagad + TimeValue ("00: 00: 1"))DoEventsNākamais rindas numursBeigu apakš |
No pirmā acu uzmetiena kods VBA iesācējiem var šķist biedējošs, taču patiesībā ir jāveic tikai dažas vienkāršas darbības, lai pielāgotu kodu savām vajadzībām.
Būtībā kodu var iedalīt četrās sadaļās, kā parādīts zemāk esošajā ekrānuzņēmumā. Zaļie taisnstūri attēlo koda segmentus, kas ir jāpielāgo jūsu datiem, bet pārējie paliek nemainīgi.
Tuvināsim detaļas, kas nepieciešamas, lai precizētu. Jūsu ērtībai vēlreiz apskatiet datu tabulu un sekojiet manām pēdām:
Deklarēt mainīgos: Šī sadaļa iepazīstina ar jauniem mainīgajiem, ar kuriem VBA strādāt. Mūsu gadījumā konstante ir apzīmēta kā “StartRow”Palīdz VBA saprast, kur sākas datu tabula (2. rinda). Tāpēc nemainīgajai vērtībai jāatbilst rindai, kurā sākas jūsu dati.
| 1 | Const StartRow tik ilgi = 2 |
Iegūstiet pēdējo datu rindu: Šī koda rinda liek VBA analizēt datu tabulu un definēt, kur beidzas datu tabula (13. rinda), lai vēlāk varētu tuvināt tikai vērtības noteiktā šūnu diapazonā, atstājot ārpusē pārējo darblapu.
Lai to noņemtu, norādiet pirmo kolonnu (“A”) kur sākas datu tabula, lai VBA atrastu pēdējo kolonnu šajā rindā, kurā ir tukša šūna (A sleja).
| 1 | LastRow = Diapazons ("A" un StartRow) .End (xlDown) .Row |
Notīrīt diagrammu un parādīt tukšu diagrammu: Šī sadaļa ir atbildīga par palīgu kolonnu vērtību dzēšanu (F: Es) katru reizi, kad palaižat makro.
Tādā veidā jūs varat atkārtot to pašu animēto efektu atkal un atkal, patstāvīgi neiztīrot darblapas šūnas. Lai pielāgotu, datu tabulā norādiet pirmo un pēdējo palīga sleju (“F” un “I”).
| 1 | Diapazons ("F" un StartRow, "I" un LastRow). Skaidrs saturs |
Iet cauri katram diagrammas periodam: Šeit notiek visa maģija. Izvēloties šūnu diapazonu, VBA iet pa rindām un aizpilda palīga kolonnas ar atbilstošajām faktiskajām vērtībām ar vienas sekundes intervālu, efektīvi radot animācijas efektu.
Lai to izvilktu, jums ir jāmaina tikai šī koda rindiņa, lai VBA kopētu vērtības palīgkolonnās:
| 1 | Diapazons ("F" un rindu numurs, "es" un rindu numurs). Vērtība = diapazons ("B" un rindu numurs, "E" un rindu numurs). Vērtība |
Pirmā koda daļa (Diapazons (“F” un rindas numurs, “es” un rindas numurs). Vērtība) satver visas datu tabulas palīgu kolonnas (F: Es), bet vienādojuma otrā daļa (Diapazons (“B” un rindas numurs, “E” un rindas numurs). Vērtība) ir atbildīgs par faktisko vērtību importēšanu tajos.
Paturot to prātā, “F” un “Es” vērtības raksturo pirmo un pēdējo palīga kolonnu (F un I slejas). Ar to pašu, “B” un “E” apzīmē pirmo un pēdējo sleju, kurā ir faktiskie IKP skaitļi (B un E slejas).
Kad esat to visu paveicis, noklikšķiniet uz disketes ikonas, lai saglabātu VBA kodu un aizvērtu redaktoru.
4. solis: izveidojiet makro pogu.
Lai saistītu darblapas datus un jaunizveidoto makro, iestatiet pogu VBA koda izpildei.
- Dodieties uz Izstrādātājs cilni.
- Noklikšķiniet uz “Ievietot”Pogu.
- Zem "Veidlapu vadīklas,"Izvēlieties"Poga (veidlapas vadība).”
Noklikšķiniet vietā, kur vēlaties ievietot pogu (vēlams diagrammas nosaukuma tuvumā). Tajā brīdī ,. Piešķirt makro parādīsies dialoglodziņš. Atlasiet tikko izveidoto VBA makro (Animated_Chart) un noklikšķiniet uz "LABI.”
Visbeidzot, mainiet pogas tekstu (veiciet dubultklikšķi uz pogas teksta un pārdēvējiet). Ja nepieciešams, pārvietojiet pogu vēlamajā vietā.
Tagad noklikšķiniet uz pogas un noskatieties, kā VBA vienmērīgi aizpilda tukšo diagrammu ar faktiskajām vērtībām, un šīs metodes skaistums ir tāds, ka jūs varat mainīt pamatā esošo diagrammas veidu tikai ar dažiem klikšķiem, bez nepieciešamības vēlreiz izlēkt cauri visiem lokiem!
Tātad tas tiek darīts tā. Excel diagrammu animēšana var būt lielisks veids, kā sniegt unikālu savu datu perspektīvu, kuru citādi būtu varējis ignorēt.
Acīmredzot var paiet zināms laiks, lai patiešām izprastu VBA koda loģiku. Bet, tā kā vienu un to pašu kodu var atkārtoti izmantot dažāda veida datiem un diagrammām, ir vērts pielikt pūles, lai to izmēģinātu. Tiklīdz jūs pārvarēsit īso mācīšanās līkni, pasaule būs jūsu austere.
