第一步：需要一張普通的地圖圖片

這個很簡單，網上到處都有。中國的省級地圖，地級市地圖，甚至縣級地圖都可以找到。這里兩個小要求：1）盡量找張干凈的圖，干凈指的是地圖的邊界清晰；2）svg格式的圖（Scalable Vector Graphics）- 別慌，推薦你個下載svg格式地圖模板的好去處： Wikimedia Commons

在這個網站搜索China provinces，可以得到下面這些圖（上百張），第一張圖就很符合我們的要求：

第二步：打開下載的svg圖。這里推薦個免費開源的軟件：Inkscape。用這個軟件打開svg的地圖，然后另存為Enhanced Meta File（emf）格式的文件。

第三步：用excel導入emf的文件，然后ungroup這個地圖變成freeform的圖形，如下圖。

這樣我們就得到了excel里面的地圖素材。

第四步：每個省現在對應的名字都沒有，我們需要重新命名。簡單的方法：鼠標點擊選一個省，在左上角公式旁邊的文本框里輸入省的名字，如下圖：

第五步：在excel里另建一個worksheet，按照下圖來設計數據版面：

更新：Ｆ列每個顏色的單元格漏寫了對應的命名，比如白色的單元格，將其命名為對應的Ｊ列的值（classpro0）

漸變顏色可以自己選擇，目前這個例子是從0到5六種類別（顏色），根據你的研究需要（比如各省人均收入水平你按照高低分了10類，那就10種），隨便改多少種都可以，唯一注意的就是命名的區域要跟著變。再啰嗦一下：根據你自己的分類標準，篩選你的數據，將篩選后的分類結果（比如6種 0-5）對應到之前提到的類別中，這樣也就對應好了顏色。

第六步：這些都做完了，在地圖那頁worksheet里面加個按鈕，把下面這段VBA程序copy進去：

For i = 2 To 32 '這里是省的數量，2代表的是后面連接的數據表起始位是第二行，可以根據你自己的設計更改    Range("actRegProvince").Value = Range("Data_Province!D" & i).Value '按順序選取數據表中省份        ActiveSheet.Shapes(Range("actRegProvince").Value).Select '激活對應的省份地圖    Selection.ShapeRange.Fill.ForeColor.RGB = Range(Range("actRegCodeProvince")).Interior.Color '將數據表中省份對應的顏色類別賦值給對應的省份地圖Next i

補充說明：Data_Province!D中Data_Province是數據表（worksheet）的名字，D指的是省份名字所在的列（見上面那張截圖）。根據自己的需要可以改成你喜歡的名字或位置。

第七步：這步不算了啊！就是六步~

點擊按鈕，享受成果，不謝!

把剛才的地圖換成紫色漸變色，效果如下：

我過去的研究用過的一些樣圖（ps: 數據原因，有些圖未包含臺灣）：

地級市級別方言地圖

地級市層面經濟集群圖

神經網絡算法分類中國地級市

同樣方法制作縣級地圖