在特定位置插入圖表對象

我在excel中編寫了一個宏來插入圖表。當選擇特定範圍的單元格時，該宏將運行。是：在特定位置插入圖表對象

Sub drawchart2() 
' 
' drawchart2 Macro 
' 

' 
    Range("B24:C36").Select 
    ActiveSheet.Shapes.AddChart.Select 
    ActiveChart.ChartType = xlLineMarkers 
    ActiveChart.SetSourceData Source:=Range("'Sheet'!$B$24:$C$36" _ 
     ) 
    ActiveSheet.Shapes("Chart 6").IncrementLeft 256.1797637795 
    ActiveSheet.Shapes("Chart 6").IncrementTop -84.2696062992 
    ActiveSheet.Shapes("Chart 6").IncrementLeft 54.7752755906 
    ActiveSheet.Shapes("Chart 6").IncrementTop -19.3820472441 
End Sub

但這圖表插入Excel中worksheet.I中間要插入到sheet.How的右上角做呢？

來源

2013-10-24 user2373603

你可以很容易地將它定位到頂部，但右邊是任意的，因爲有人可以調整窗口大小或滾動。由於這個原因，Excel從左上角默認位置。你可以得到屏幕的寬度並做一些數學運算，但是我懷疑這就是你真正想要的。距離左側邊緣或可以水平定位的特定列是否有設置距離？

這裏是如何從頂部位置：

ActiveSheet.Shapes.AddChart.Select 

With ActiveChart 
    .ChartType = xlLineMarkers 
    .SetSourceData Source:=Range("Sheet1!$B$24:$C$36") 
    .Parent.Top = 0 
    .Parent.Left = 100 
End With

來源

2013-10-24 22:17:35

在特定位置插入圖表對象

回答

相關問題