1、首先第一步在製作熱力地圖前,這時候需要準備好一幅矢量地圖,以中國行政地圖爲例,需要每個省份的行政區劃地圖都可以被單獨編輯。
2、然後就是在製作前請確保你的Excel已經啓用宏,並添加了“開發工具”選單。“開發工具”選單的添加方式爲:“檔案”——“選項”——“自訂功能區”——主選項卡——勾選“開發工具”即可。
3、接着進行添加完成後回到Excel頁面,選單欄中就會出現“開發工具”選單。
4、然後要建立臨時存放各類數據的單元格區域,注意的是要包括三個值:區域名、區域對應的數據結果,以及區域對應的顏色。可以選定任意空單元格進行放置即可。
5、接着就是對各區域或單元格進行重命名,即選擇相應的區域或單元格然後對其進行重命名。例如選擇$J$3單元格,再來名稱框中輸入“Actreg”並回車,這時候就可以將以下區域全部重命名。
6、然後將第一個單元格,命名爲:Actreg,用於臨時存放“當前區域”的拼音名,還有就是第二個單元格命名爲:ActregValue,用於臨時存放“當前區域”的指標值。
7、接着就是要對分別對$J$4單元格和$J$5單元格設定公式如下:
$J$4:=VLOOKUP(Actreg,RegData,2,0)
8、然後就是要在“開發工具”選單選擇插入“按鈕”,注意在地圖上方插入一個按鈕。
9、接着就是進行選擇按鈕,並雙擊,這時候要開啟Visual Basic編輯器,並輸以下代碼:
Private Sub CommandButton1_Click()
For i = 4 To 34
Range("ActReg")e = Range("sheet1!b" & i)e
es(Range("ActReg")e)ct
=Range(Range("ActRegCode")e)r
Next i
End Sub
10、最後進行儲存並關閉VBA編輯器,回到Excel介面,只需要點擊按鈕,地圖就可以根據各區域值的範圍填充相對應的顏色了就完成了。