Ten samouczek pokaże, jak tworzyć animowane wykresy we wszystkich wersjach programu Excel: 2007, 2010, 2013, 2016 i 2022.
Animowany wykres Excela, który wyświetla się na ekranie na oczach odbiorców, to potężny, przyciągający uwagę sposób na wprowadzenie danych w ruch.
W przeciwieństwie do wykresów statycznych, animowane wykresy zapewniają dodatkowy kontekst dla danych i pomagają zidentyfikować pojawiające się wzorce. Jako przykład spójrz na animowany wykres liniowy ze znacznikami pokazanymi poniżej, który przedstawia PKB czterech krajów (USA, Chin, Brazylii i Turcji) w ciągu ostatnich kilku dekad.
Podczas gdy statyczny odpowiednik nie wyglądałby niczym wyjątkowym ani nowym, animowany efekt umożliwia wykresowi opowiedzenie historii za Ciebie, ożywiając nieruchome liczby PKB.
W tym przyjaznym dla początkujących samouczku krok po kroku dowiesz się, jak zrobić to samo z danymi - nawet jeśli dopiero stawiasz pierwsze kroki w programie Excel.
Pierwsze kroki
Rozważ poniższą tabelę danych zawierającą dane dotyczące PKB dla każdego kraju:
Aby animować wykres, użyjemy prostego makra VBA, które płynnie wykreśli wartości na wykresie.
Uwaga: dodając kod VBA do skoroszytu, zapisz skoroszyt w formacie .xlsm (Arkusz roboczy programu Microsoft Excel z obsługą makr), aby włączyć makra.
Teraz zakasajmy rękawy i zabierzmy się do pracy.
Krok 1: Skonfiguruj kolumny pomocnicze.
Na początek rozwiń tabelę danych o dodatkowe kolumny pomocnicze, do których rzeczywiste wartości będą stopniowo kopiowane, tworząc efekt animacji.
Skopiuj nagłówki kolumn zawierających liczby PKB (B2:E2) do odpowiednich komórek obok tabeli danych (F2:I2).
Zakres komórek podświetlony na jasnoczerwono (F3:I13) określa miejsce, w którym będziemy przechowywać dane wyjściowe makra VBA.
Dodatkowo dodaj separatory dziesiętne dla podświetlonego zakresu komórek (Strona główna > Numer > Styl przecinka).
Krok 2: Narysuj pusty wykres.
Po przydzieleniu miejsca na kolumny pomocnicze, zbuduj pusty wykres 2D, korzystając z kolumn (F2:I13) jako dane źródłowe:
- Zaznacz dowolną pustą komórkę.
- Przełącz na Wstawić patka.
- Kliknij "Wstaw wykres liniowy lub warstwowy.”
- Wybierać "Linia ze znacznikami.”
Zrobiwszy to, musimy teraz połączyć pusty wykres z komórkami w kolumnach pomocniczych (F:Ja). Kliknij prawym przyciskiem myszy pusty wykres i kliknij „Wybierz Dane.”
w Wybierz źródło danych okno dialogowe, pod „Wpisy legendy (seria)," Uderz w "Dodać" przycisk.
Kiedy Edytuj serię pojawi się okno dialogowe, utwórz cztery nowe serie danych na podstawie kolumn pomocniczych (F:Ja):
- Do "Nazwa serii,” określ komórkę wiersza nagłówka kolumna USA (F2).
- Do "Wartości serii,” wybierz odpowiedni pusty zakres komórek (F3:F13).
Powtórz ten sam proces dla pozostałych trzech kolumn.
Po utworzeniu serii danych zaimportuj etykiety osi poziomej do wykresu.
Aby to zrobić, pod „Etykiety osi poziomej (kategorii)," Kliknij "Edytować" przycisk.
w Etykiety osi okno dialogowe, pod „Zakres etykiety osi”, podświetl wartości osi (A3:A13).
Oto wskazówka dla profesjonalistów: jeśli regularnie dodajesz lub usuwasz elementy z tabeli danych, skonfiguruj dynamiczne zakresy wykresów, aby uniknąć kłopotów z koniecznością każdorazowego poprawiania kodu źródłowego.
Aby to zakończyć, spraw, aby przyszły wykres liniowy był jeszcze bardziej informacyjny, dodając tytuł i legendę wykresu:
- Kliknij obszar wykresu.
- Przejdź do Projekt patka.
- Wybierz "Dodaj elementy wykresu.”
- Dodaj tytuł wykresu (Tytuł wykresu > Powyżej wykresu).
- Dodaj legendę wykresu (Legenda > Dół).
Krok #3: Zaprogramuj VBA, aby stworzyć animowany efekt.
Gdy dane źródłowe wykresu zostaną skonfigurowane we właściwy sposób, nadchodzi czas na trudne częściowe napisanie makra VBA, które wykona za Ciebie całą brudną robotę za pomocą jednego kliknięcia.
Zanim zagłębimy się w sedno sprawy, upewnij się, że masz Karta Deweloper wyświetlana na Wstążce. Jeśli jest wyłączony, kliknij prawym przyciskiem myszy dowolne puste miejsce w Wstążka i wybierz „Dostosuj wstążkę” z menu, które się pojawi.
w Opcje programu Excel w oknie dialogowym zaznacz pole „Deweloper” i kliknij “OK.”
Po wykonaniu tej czynności nadszedł czas, aby wydać Kraken of Excel, funkcję, która przesuwa granice tego, co jest możliwe w świecie arkuszy kalkulacyjnych. Czas uwolnić moc VBA.
Najpierw otwórz edytor VBA:
- Przejdź do Deweloper patka.
- Kliknij "Visual Basic" przycisk.
W edytorze wybierz Wstawić zakładkę i wybierz „Moduł.”
Tam skopiuj następujące makro do okna kodu:
| 123456789101112131415161718192021222324 | Sub Animated_Chart()„Zadeklaruj zmienne”Const StartRow As Long = 2Dim LastRow tak długoDim RowNumber tak długi„Pobierz ostatni wiersz danych”LastRow = Range("A" i StartRow).End(xlDown).Row'Wyczyść wykres i wyświetl pusty wykresZakres("F" & StartRow, "I" & LastRow).ClearContentsZdarzeniaApplication.Wait (Teraz + TimeValue("00:00:1"))„Przejdź przez każdy okres wykresu”Dla RowNumber = StartRow to LastRowZdarzeniaRange("F" & RowNumber, "I" & RowNumber).Value = Range("B" & RowNumber, "E" & RowNumber).ValueApplication.Wait (Teraz + TimeValue("00:00:1"))ZdarzeniaNumer następnego rzęduNapis końcowy |
Na pierwszy rzut oka kod może wydawać się zniechęcający nowicjuszom VBA, ale w rzeczywistości wystarczy kilka prostych kroków, aby dostosować kod do swoich potrzeb.
Zasadniczo kod można podzielić na cztery sekcje, jak pokazano na poniższym zrzucie ekranu. Zielone prostokąty reprezentują segmenty kodu, które muszą być dostosowane do Twoich danych, podczas gdy reszta powinna pozostać niezmieniona.
Powiększmy części, które trzeba dostroić. Dla Twojej wygody spójrz jeszcze raz na tabelę danych i podążaj moimi śladami:
Zadeklaruj zmienne: W tej sekcji przedstawiono nowe zmienne, z którymi VBA może pracować. W naszym przypadku stała oznaczona jako „Rozpocznij wiersz” pomaga VBA ustalić, gdzie zaczyna się tabela danych (rząd 2). Dlatego wartość stała powinna odpowiadać wierszowi, w którym zaczynają się dane.
| 1 | Const StartRow As Long = 2 |
Pobierz ostatni wiersz danych: Ten wiersz kodu mówi VBA, aby przeanalizował tabelę danych i określił, gdzie kończy się tabela danych (wiersz 13), aby później mógł powiększać tylko wartości z określonego zakresu komórek, pomijając resztę arkusza.
Aby to zrobić, określ pierwszą kolumnę ("A") gdzie zaczyna się tabela danych, aby VBA znalazł ostatni wiersz w tej kolumnie, który zawiera niepustą komórkę (kolumna A).
| 1 | LastRow = Range("A" i StartRow).End(xlDown).Row |
Wyczyść wykres i wyświetl pusty wykres: Ta sekcja jest odpowiedzialna za wymazywanie wartości w kolumnach pomocniczych (F:Ja) przy każdym uruchomieniu makra.
W ten sposób możesz wielokrotnie powtarzać ten sam animowany efekt bez konieczności samodzielnego czyszczenia komórek arkusza. Aby dostosować, określ pierwszą i ostatnią kolumnę pomocnika w tabeli danych („F” i „I”).
| 1 | Zakres("F" & StartRow, "I" & LastRow).ClearContents |
Przejdź przez każdy okres wykresu: To tutaj dzieje się cała magia. Po wybraniu zakresu komórek VBA przechodzi wiersz po wierszu i wypełnia kolumny pomocnicze odpowiednimi wartościami rzeczywistymi w odstępach jednosekundowych, skutecznie tworząc animowany efekt.
Aby to zrobić, wystarczy zmienić ten wiersz kodu, aby VBA skopiował wartości do kolumn pomocniczych:
| 1 | Range("F" & RowNumber, "I" & RowNumber).Value = Range("B" & RowNumber, "E" & RowNumber).Value |
Pierwsza część kodu (Zakres(„F” i numer wiersza, „I” i numer wiersza).Wartość) pobiera wszystkie kolumny pomocnicze w tabeli danych (F:Ja) natomiast druga część równania (Zakres(„B” i numer wiersza, „E” i numer wiersza).Wartość) odpowiada za importowanie do nich rzeczywistych wartości.
Mając to wszystko na uwadze, "F" oraz "I" wartości charakteryzują pierwszą i ostatnią kolumnę pomocnika (kolumny F i I). A tym samym, "B" oraz "MI" oznaczają pierwszą i ostatnią kolumnę zawierającą rzeczywiste liczby PKB (kolumny B i E).
Po wykonaniu tego wszystkiego kliknij ikonę dyskietki, aby zapisać kod VBA i zamknąć edytor.
Krok 4: Utwórz przycisk makra.
Aby powiązać dane arkusza roboczego i nowo utworzone makro, skonfiguruj przycisk do wykonywania kodu VBA.
- Przejdź do Deweloper patka.
- Kliknij "Wstawić" przycisk.
- Pod "Kontrolki formularzy," Wybierz "Przycisk (kontrolka formularza).”
Kliknij w miejscu, w którym chcesz umieścić przycisk (najlepiej w pobliżu tytułu wykresu). W tym momencie Przypisz makro pojawi się okno dialogowe. Wybierz właśnie utworzone makro VBA (Animowany_Wykres) i kliknij „OK.”
Na koniec zmień tekst przycisku (dwukrotnie kliknij tekst przycisku i zmień nazwę). W razie potrzeby przesuń przycisk w odpowiednie miejsce.
Teraz kliknij przycisk i zobacz, jak VBA płynnie wypełnia pusty wykres rzeczywistymi wartościami – a piękno tej metody polega na tym, że możesz zmienić typ wykresu za pomocą zaledwie kilku kliknięć bez konieczności ponownego przeskakiwania przez wszystkie obręcze!
Więc tak to się robi. Animowanie wykresów Excela może być świetnym sposobem na nadanie danych z wyjątkowej perspektywy, którą można by przeoczyć.
Oczywiście zrozumienie logiki kodu VBA może zająć trochę czasu. Ale ponieważ ten sam kod może być wielokrotnie używany do różnych typów danych i wykresów, warto spróbować. Gdy przejdziesz przez krótką krzywą uczenia się, świat stanie się twoją ostrygą.
