excel2010製作中國資料地圖
阿新 • • 發佈:2018-12-11
前兩天,一同事問我如何用excel做資料地圖,當時我是完全不知怎麼下手,然後上網跟著教程學習,做出了自己的一個地圖模板。
第一步:從網上下載高清的地圖(可以是中國地圖,也可以是省市地圖)。但是這張地圖必須滿足下面兩個要求:
(1)地圖的邊界要清晰
(2)svg格式的圖(Scalable Vector Graphics)。可以從網站:Wikimedia Commons 上搜索到。但是下載的時候要選擇,這樣下載的圖片是最清晰的。
第二步:下載並安裝免費開源的軟體:Inkscape,用這個軟體開啟svg的圖片。然後另存為增強圖元型檔案(emf)格式的。
第三步:將圖片插入到excel的一個工作表中。並選中該圖片後,右擊選單中選擇“取消組合”命令,圖片就都分離開了。
第四步:選中每個省的版塊後,定義名稱。簡單的方法:滑鼠點選選一個省,在左上角公式旁邊的文字框裡輸入省的名字,如下圖:
第五步: 在excel裡新建一個工作表,按照下圖來設計資料版面、定義名稱,還有編輯的兩個公式如下圖2:
漸變顏色可以自己選擇,目前這個例子是從0到5六種類別(顏色),根據你的研究需要隨便改多少種都可以,唯一注意的就是命名的區域要跟著變。
第六步:在工作表中加個按鈕,然後把下面這段程式碼複製進去:
Private Sub 開始填充_Click() For i = 2 To 32 Range("ActReg1").Value = Range("sheet2!A" & i).Value ActiveSheet.Shapes(Range("ActReg1").Value).Select Selection.ShapeRange.Fill.ForeColor.RGB = Range(Range("ActRegCode1").Value).Interior.Color ' Selection.ShapeRange.Fill.Patterned Range(Range("ActRegCode").Value).Interior.Pattern Next i Range("s11").Select End Sub
補充說明:其中sheet2是工作表的名字,A指的是省份名字所在的列(見上面那張截圖)。根據自己的需要可以改成你喜歡的名字或位置。
第七步:將分離的圖片的圖片畫布跟各個圖片物件分開,然後複製該地圖。並且貼上到合適位置後,將貼上型別選擇為“連結圖片”,圖例也可以類似的做法。那麼點選按鈕就可以了!
地圖還可以是各個省或市的,大家可以直接做一個屬於自己資料的地圖了。