前些天網上流傳著一個讓無數中國人為之振奮的數據可視化圖表視頻,該視頻展示了世界GDP排名前10的國家從1968年-2023年的GDP增長變化情況。

視頻中,條形圖隨著年份的變化不斷增長,各國的排名也在不停的切換,伴著激動人心的音樂,看著中國的排名不斷上升,心中的自豪感油然而生,不禁高呼一聲:「厲害了動態柱狀圖視頻的制作方法,我的國!」。

然而激動的心情剛剛平復,我就在琢磨一件事兒,這個圖表怎么做的? 大家有沒有和我一樣的想法? 這個應該是用很高大上的軟件做的吧?很遺憾,到現在我也不知道是什么軟件。不過,別糾結,糾結是沒辦法解決問題滴,試試EXCEL能不能做出來吧!

于是就有了這個「山寨」版的動態圖表,雖然山寨,但是我很用心哦!感興趣的小伙伴跟我一起來看看如何實現這個效果的吧!

5大步驟就能搞定!我現在不太敢說「輕松」這兩個字了,大家自己感受吧!

步驟一、構建圖表數據

數據源來源于世界銀行的數據網站(工作表Data直接從該網站下載獲取)

繪制圖表前,我們需要進行一些數據整理。

① 構建如上圖所示表格,列出需要展示在圖表中的10個國家名稱。

② 在B1單元格錄入數字「1960」。

③ 在B2單元格錄入公式:=(A2,Data!$A:$BJ,MATCH($B$1,Data!$A$1:$BJ$1,0),0),向下填充公式。該公式用來獲取Data工作表中對應B1單元格中年份的各國的GDP數據。

④在C2單元格錄入公式:

=IF(MID(C$1,FIND("-",C$1)+1,99)=$A2,$B2,NA()),向右向下填充。

從C列開始為輔助列。該公式用來獲取對應輔助列國家的GDP數據動態柱狀圖視頻的制作方法,輔助列的作用是用來給每個國家固定著色。如果沒有這些輔助數據,條形圖的顏色會隨著動態圖表排序的變化而改變,這樣中國就不能始終顯示成紅色了,唉,我是這么的愛國啊,為了讓我們的大中國一直紅下去,我也是拼了!

步驟二、插入條形圖,美化圖表。

①選擇A2:B11區域插入條形圖,并將系列名稱改為「標簽輔助」。

② 設置數據系列格式,系列重疊100%,分類間距30%。

③ 選擇C1:L11區域復制粘貼到圖表中,更改「系列 "輔助-中國"」顏色為紅色。

④ 刪除圖例、網格線,修改圖表區填充色,調整圖表大小和位置。

⑤ 圖表標題鏈接到B1單元格,并調字體、字號和位置。

⑥ 設置垂直類別軸格式,逆序類別,無線條,字體為微軟雅黑,加粗。

⑦ 設置水平 (值) 軸格式,設置顯示單位和數字格式。

⑧選擇標簽輔助系列添加標簽,設置標簽數字格式,調整繪圖區大小到合適位置。

步驟三、復制代碼到VBE編輯器

ALT+F11進入VBE編輯器,將下面代碼復制進去即可。代碼此處不做講解,詳情參見視頻教程。

Sub 自動播放()

Dim i , n As Long

For i = 0 To 57

[B1] =1960 + i

For n = 1To 1000

.Wait (Now + 0.)

Next n

Call 排序

Next i

End Sub

Sub 排序()

Range("a1:c11").Sort key1:=Range("b2"),:=, :=xlYes, :=

.Wait (Now + 0.)

End Sub

步驟四、繪制一個播放按鈕并指定宏

插入形狀→編輯文字→調整格式→指定宏

步驟五、保存測試

工作表保存為啟動宏的工作簿(后綴名為.xlsm),否則下次打開代碼丟失,圖表就不會動了。

如果想要調整速度,修改代碼中紅色框框的數字大小即可,數字越大,播放速度越慢,反之則越快。

是不是想問怎么在PPT中做這樣的動態圖表?不用大費周章,錄制一個GIF貼到PPT里就搞定了,此處不再贅述了,拜拜了,我們下期再見!

……