VBA指定圖表位置
前幾篇介紹到使用「VBA插入圖表」，省去手動操作的麻煩，那要怎麼使用「VBA將圖表放至指定位置」呢？
如要將以下數據插入圖表以及將圖表放至指定位置。
輸入巨集
※輸入以下指令※
Sub 指定圖表位置()
Range("A1").CurrentRegion.Select
ActiveSheet.Shapes.AddChart Left:=Range("E1").Left, Top:=Range("E1").Top
End Sub
執行巨集
點選「開發人員」-「 巨集」或按下「Ctrl」+「F8」快捷鍵，並「執行」巨集。
執行後則快速將「A1區域資料」插入圖表，並將圖表放至指定位置，對齊 「E1」 儲存格的左邊與頂部。
語法說明
Left:=Range(“E1”).Left
‘設定圖表的左邊位置，與E1儲存格的左邊對齊。
Top:=Range(“E1”).Top
‘設定圖表的頂部位置，與E1儲存格的頂部對齊。
精簡語法
原本語法過長，我們可以搭配「With」句來精簡語法。
Sub 指定圖表位置()
Range("A1").CurrentRegion.Select
With Range("E1")
ActiveSheet.Shapes.AddChart Left:=.Left, Top:=.Top
End With
End Sub
