Jak vytvořit animované grafy v aplikaci Excel

Tento tutoriál předvede, jak vytvářet animované grafy ve všech verzích aplikace Excel: 2007, 2010, 2013, 2016 a 2022.

Animovaný graf aplikace Excel, který se na obrazovce kreslí před očima vašeho publika, je účinný způsob, jak dát data do pohybu.

Na rozdíl od statických grafů poskytují animované grafy vašim datům další kontext a pomáhají identifikovat nově vznikající vzorce. Jako příklad se podívejte na animovaný spojnicový graf s níže uvedenými značkami, které ukazují HDP čtyř zemí (USA, Čína, Brazílie a Turecko) za posledních několik desetiletí.

Přestože by statický protějšek nevypadal jako nic zvláštního nebo nového, animovaný efekt umožňuje grafu vyprávět příběh za vás a přináší život nehybným číslům HDP.

V tomto podrobném tutoriálu vhodném pro nováčky se naučíte, jak udělat to samé s vašimi daty-i když právě děláte první kroky v Excelu.

Začínáme

Zvažte následující tabulku dat obsahující údaje o HDP pro každou zemi:

K animaci grafu použijeme jednoduché makro VBA, které bude plynule vykreslovat hodnoty do grafu.

Poznámka: Při přidávání kódu VBA do sešitu nezapomeňte uložit sešit ve formátu .xlsm (Pracovní list makra Microsoft Excel) k povolení maker.

Nyní si vyhrňme rukávy a pusťme se do práce.

Krok č. 1: Nastavte pomocné sloupce.

Chcete -li začít, rozbalte datovou tabulku o další pomocné sloupce, do kterých se postupně zkopírují skutečné hodnoty, čímž vytvoříte efekt animace.

Zkopírujte záhlaví sloupců obsahujících čísla HDP (B2: E2) do odpovídajících buněk vedle datové tabulky (F2: I2).

Rozsah buněk zvýrazněný světle červenou barvou (F3: I13) definuje místo, kam budeme ukládat výstup makra VBA.

Navíc přidejte oddělovače desetinných míst pro zvýrazněný rozsah buněk (Domů> Číslo> Styl čárky).

Krok č. 2: Nakreslete prázdný graf.

Jakmile přidělíte nějaké místo pro pomocné sloupce, vytvořte prázdný 2-D graf pomocí sloupců (F2: I13) jako zdrojová data:

  1. Zvýrazněte libovolnou prázdnou buňku.
  2. Přepnout na Vložit tab.
  3. Klikněte na „Vložte čárový nebo plošný graf.
  4. Vybrat "Řádek se značkami.

Poté, co jsme to udělali, musíme nyní propojit prázdný graf s buňkami ve sloupcích pomocníka (F: Já). Klikněte pravým tlačítkem na prázdný graf a klikněte na „Vyberte Data.

V Vyberte Zdroj dat dialogové okno v části „Legendární záznamy (série)," udeř "Přidat" knoflík.

Když Upravit sérii objeví se dialogové okno, vytvořte čtyři nové datové řady založené na pomocných sloupcích (F: Já):

  1. Pro "Název série,”Zadejte buňku řádku záhlaví sloupec USA (F2).
  2. Pro "Hodnoty řady,”Vyberte odpovídající prázdný rozsah buněk (F3: F13).

Stejný postup opakujte pro zbývající tři sloupce.

Jakmile máte datové řady na svém místě, importujte popisky vodorovných os do grafu.

Chcete -li to provést, v části „Štítky osy horizontální (kategorie),“Klikněte na„Upravit" knoflík.

V Štítky os dialogové okno v části „Rozsah označení osy, ”Zvýrazněte hodnoty os (A3: A13).

Zde je tip pro profesionály: Pokud pravidelně přidáváte nebo odebíráte položky z datové tabulky, nastavte dynamické rozsahy grafů, abyste se vyhnuli problémům s vylepšováním zdrojového kódu pokaždé, když k tomu dojde.

Aby toho nebylo málo, udělejte budoucí spojnicový graf ještě informativnější přidáním názvu a legendy grafu:

  1. Klikněte na oblast grafu.
  2. Jděte na Design tab.
  3. Vyberte „Přidejte prvky grafu.
  4. Přidejte název grafu (Název grafu> Nad grafem).
  5. Přidat legendu grafu (Legenda> Dole).

Krok č. 3: Naprogramujte VBA tak, aby vytvořil animovaný efekt.

Jakmile jsou zdrojová data grafu nastavena správným způsobem, přichází na řadu tvrdé psaní makra VBA, které za vás udělá veškerou špinavou práci jediným kliknutím.

Než se ponoříme do hnusné drti, ujistěte se, že máte Na pásu karet se zobrazí karta vývojáře. Pokud je zakázáno, klikněte pravým tlačítkem na libovolné prázdné místo v Stuha a vyberte „Přizpůsobte pás karet”Ze zobrazené nabídky.

V Možnosti aplikace Excel v dialogovém okně zaškrtněte „Vývojář“A klikněte na„OK.

Poté je čas vydat Kraken of Excel, funkci, která posouvá hranice toho, co je ve světě tabulek možné. Je čas uvolnit sílu VBA.

Nejprve otevřete editor VBA:

  1. Přejděte na Vývojář tab.
  2. Klikněte na „Visual Basic" knoflík.

V editoru vyberte Vložit kartu a vyberte „Modul.

Jakmile jste tam, zkopírujte následující makro do okna kódu:

123456789101112131415161718192021222324 Sub Animated_Chart ()"Deklarujte proměnné."Const StartRow As Long = 2Dim LastRow As LongDim RowNumber As Long„Získejte poslední řádek datLastRow = Range ("A" & StartRow) .End (xlDown) .Row'Vymazat graf a zobrazit prázdný grafRozsah ("F" & StartRow, "I" & LastRow) .ClearContentsUdálosti DoEApplication.Wait (Now + TimeValue ("00: 00: 1"))„Projděte každé období grafuPro RowNumber = StartRow To LastRowUdálosti DoERozsah ("F" & RowNumber, "I" & RowNumber) .Value = Range ("B" & RowNumber, "E" & RowNumber) .HodnotaApplication.Wait (Now + TimeValue ("00: 00: 1"))Události DoEDalší číslo řádkuEnd Sub

Na první pohled se může kód zdát pro nováčky VBA skličující, ale ve skutečnosti stačí pár jednoduchých kroků k přizpůsobení kódu vašim potřebám.

V zásadě lze kód rozdělit na čtyři části, jak je znázorněno na níže uvedeném snímku obrazovky. Zelené obdélníky představují segmenty kódu, které musí být přizpůsobeny vašim datům-zatímco zbytek by měl zůstat beze změny.

Pojďme si přiblížit části, které potřebujete doladit. Pro vaše pohodlí se ještě jednou podívejte na datovou tabulku a postupujte podle mých kroků:

Deklarujte proměnné: Tato část zavádí nové proměnné, se kterými VBA pracuje. V našem případě je konstanta označena jako „StartRow”Pomáhá VBA zjistit, kde začíná datová tabulka (řada 2). Proto by konstantní hodnota měla odpovídat řádku, kde začínají vaše data.

1 Const StartRow As Long = 2

Získejte poslední řádek dat: Tento řádek kódu říká VBA, aby analyzovala datovou tabulku a definovala, kde datová tabulka končí (řada 13), aby se později mohl přiblížit pouze na hodnoty v zadaném rozsahu buněk a vynechat zbytek listu.

Chcete -li to stáhnout, zadejte první sloupec ("A") kde začíná datová tabulka, aby VBA našel poslední řádek v tomto sloupci, který obsahuje neprázdnou buňku (sloupec A).

1 LastRow = Range ("A" & StartRow) .End (xlDown) .Row

Vymazat graf a zobrazit prázdný graf: Tato sekce je zodpovědná za vymazání hodnot ve sloupcích pomocníka (F: Já) pokaždé, když spustíte makro.

Tímto způsobem můžete opakovat stejný animovaný efekt znovu a znovu, aniž byste museli sami čistit buňky listu. Chcete -li upravit, zadejte do tabulky dat první a poslední pomocné sloupce („F“ a „já“).

1 Rozsah ("F" & StartRow, "I" & LastRow) .ClearContents

Projděte každé období grafu: Tady se odehrává všechno kouzlo. Po výběru rozsahu buněk jde VBA řádek po řádku a v sekundových intervalech vyplňuje pomocné sloupce odpovídajícími skutečnými hodnotami, čímž efektivně vytváří animovaný efekt.

Chcete -li to vytáhnout, stačí změnit tento řádek kódu, aby VBA zkopíroval hodnoty do pomocných sloupců:

1 Rozsah ("F" & RowNumber, "I" & RowNumber) .Value = Range ("B" & RowNumber, "E" & RowNumber) .Hodnota

První část kódu (Rozsah („F“ a číslo řádku, „I“ a číslo řádku). Hodnota) uchopí všechny pomocné sloupce v datové tabulce (F: Já) zatímco druhá část rovnice (Rozsah („B“ a číslo řádku, „E“ a číslo řádku). Hodnota) je zodpovědný za import aktuálních hodnot do nich.

S ohledem na to všechno, "F" a "Já" hodnoty charakterizují první a poslední pomocné sloupce (sloupce F a I). Stejným způsobem, „B“ a "E" znamená první a poslední sloupec, který obsahuje skutečná čísla HDP (sloupce B a E).

Jakmile to všechno zvládnete, kliknutím na ikonu diskety uložte kód VBA a zavřete editor.

Krok č. 4: Vytvořte tlačítko makra.

Chcete-li spojit data listu a nově vytvořené makro, nastavte tlačítko pro spuštění kódu VBA.

  1. Jděte na Vývojář tab.
  2. Klikněte na „Vložit" knoflík.
  3. Pod „Ovládací prvky formuláře,"Vyberte"Tlačítko (Ovládání formuláře).

Klikněte na místo, kam chcete umístit tlačítko (nejlépe poblíž názvu grafu). V tu chvíli se Přiřadit makro zobrazí se dialogové okno. Vyberte právě vytvořené makro VBA (Animovaný_chart) a klikněte na „OK.

Jako poslední úpravu změňte text tlačítka (poklepejte na text tlačítka a přejmenujte). V případě potřeby přesuňte tlačítko do požadované polohy.

Nyní klikněte na tlačítko a sledujte, jak VBA hladce vyplňuje prázdný graf skutečnými hodnotami-a krása této metody spočívá v tom, že můžete změnit typ podkladového grafu několika kliknutími, aniž byste museli znovu skákat všemi obručemi!

Tak se to dělá. Animace excelových grafů může být skvělý způsob, jak poskytnout jedinečný pohled na data, která byste jinak mohli přehlédnout.

Očividně může chvíli trvat, než skutečně porozumíte logice kódu VBA. Ale protože stejný kód lze opakovaně znovu použít pro různé typy dat a grafů, stojí za to to zkusit. Jakmile se dostanete za krátkou křivku učení, svět je vaše ústřice.

Vám pomůže rozvoji místa, sdílet stránku s přáteli

wave wave wave wave wave