특정 위치에 차트 개체 삽입

Question

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 

그러나이 차트는 sheet.How의 오른쪽 상단 모서리에 삽입 내가 할 싶지 엑셀 worksheet.I의 중간에 삽입?

Answer 1

상단에 쉽게 배치 할 수 있지만 다른 사람이 창 또는 스크롤의 크기를 조정할 수 있기 때문에 오른쪽을 임의로 지정할 수 있습니다. 이러한 이유로 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 

: 여기

상단에서 배치하는 방법입니다