辦公黨和學生黨經常會用EXCEL做很多圖，做PPT的時候這些圖需要對齊放置，如果每個圖裁切的大小不一樣，或者繪圖區矩形大小不一致，坐標軸標題位置不統一，怎么擺都覺得哪里沒有對齊。由于EXCEL強大的數據處理能力和普及使用率，小白還是堅持用EXCEL作圖。時間可貴，作為一個外行，我們不需要懂很多，夠用即可，下文是小白用Vba簡單實現以上功能，將上圖修改成下圖。與大家一起學習EXCEL繪圖，高手請多多指點。

1、建立“個人宏工作簿”：

個人宏工作簿就是一個EXCEL文件，當我們建立了個人宏工作簿以后，每次打開excel文件的時候，它在后臺自動打開并且隱藏（可在“視圖”中隱藏或者顯隱），我們可以把所有的宏都放在“個人宏工作薄”中，這樣我們就不用將EXCEL保存成含有宏的文件了。

如圖點“開發工具”（沒有的話，可以在自定義功能區里面找），點擊“錄制宏”，彈出“錄制宏對話框”在“保存在"下拉菜單選擇"個人宏工作簿",點擊”確定"，然后點擊“停止錄制”。第一個宏和個人宏工作簿就完成了。

2、編寫宏文件：

打開一個EXCEL文件，點擊“開發工具”“VisualBasic"彈出VB界面，在左側的“工程資源管理器”樹中（如果沒有，請在VB界面點”視圖“查找），我們看到了兩個項目，第一個項目“personal.xlsb"就是自動打開的隱藏的個人宏工作簿，雙擊”模塊1“，剛才錄制的宏就在這里面，覺得沒用可以刪除，在模塊1中，我們寫下以下代碼（注釋見圖片中），會點英語的應該都能看懂。這樣我們的宏建好了，以后任意EXCEL都可以用了。

Sub 宏1繪圖區和坐標軸設置()      

    Dim HalfHeight, HalfWidth, OffsetTop, OffsetLeft, ChartHeight As Double    

     ActiveChart.ChartArea.Select

     ActiveChart.ChartArea.Width = 455

     ActiveChart.ChartArea.Height = 348

     ChartHeight = ActiveChart.ChartArea.Height

     ActiveChart.PlotArea.Select

     Selection.InsideLeft = 45

     Selection.InsideTop = 10

     Selection.InsideWidth = 400

     Selection.InsideHeight = 300

     OffsetLeft = Selection.InsideLeft