VBA指定圖表大小
前幾篇介紹到「VBA指定圖表位置」，那「VBA指定圖表大小」呢？
如要將以下數據插入圖表以及指定圖表大小。
輸入巨集
※輸入以下指令※
Sub 指定圖表大小()
Range("A1").CurrentRegion.Select
ActiveSheet.Shapes.AddChart , _
Left:=Range("E1").Left, Top:=Range("E1").Top, _
Width:=Range("E1:I8").Width, _
Height:=Range("E1:I8").Height
End Sub
執行巨集
點選「開發人員」-「 巨集」或按下「Ctrl」+「F8」快捷鍵，並「執行」巨集。
執行後則快速將「A1區域資料」插入圖表，並將圖表的「寬度」與「高度」設定與「E1:I8」儲存格的「寬度」與「高度」相同。
語法說明
Width:=Range(“E1:I8”).Width
‘設定圖表的寬度，使其與「E1:I8」儲存格的寬度相同。
Height:=Range(“E1:I8”).Height
‘設定圖表的高度，使其與「E1:I8」儲存格的高度相同。
‘已上的高度我們也可以輸入數值，如 Width:=300。