之前發了幾篇畫圖跟更新圖表資料的文章,尚未調整圖表位置與調整圖表大小,
小編整理一個簡單的副程式, 設置好chart_name後
即可控制想要調整哪一張圖,在那一個儲存格位置
Sub chart_position_resize(chart_name,target_local)
ActiveSheet.ChartObjects(chart_name).Activate
With ActiveChart.Parent
.Left = ActiveSheet.Range(target_local).Left
.Width = 375
.Top = ActiveSheet.Range(target_local).top
.Height = 225
End With
End Sub
沒有留言:
張貼留言