Excel 셀 값을 .SetSourceData 범위로

Question

.SetSourceData 메서드의 범위 입력에 셀 값을 사용하는 데 문제가 있습니다. 내 셀 값은 다음과 같습니다

K6 = $C$95 
K7 = $C$137 
K8 = $F$95 
K9 = $F$137 

그래서, K6와 K7의 항목을 사용하여 새 라인 차트를 만들 싶습니다 (95 $ C $ : $ C $ 137) K8과 K9의 X 값 및 항목으로 ($ F $ 95 : $ F $ 137)를 Y 값으로 사용합니다.

내가 하드 코딩과 같이 .SetSourceData 범위의 항목이 작동하는 경우 :

.SetSourceData Source:=Sheets("Sheet1").Range("Sheet1!$C$95:$C$137, Sheet1!$F$95:$F137") 

하지만 필자의 범위와 K 세포의 값을 사용하려고하는 여러 가지 방법을 시도했다. 이 작업을 수행하는 방법에 대한 아이디어가 있습니까?

미리 감사드립니다.

PS 나는이 작업을 가져올 수 없습니다 :

는

Sub CreateChart() 

Dim X1 As String 
Dim X2 As String 
Dim Y1 As String 
Dim Y2 As String 

X1 = "$C$95" 
X2 = "$C$137" 
Y1 = Range("K6").Value 'where the value in this cell is $F$95 
Y2 = Range("K7").Value 'Where the value in this cell is $F$137 



With Sheets("Sheet1") 
    .Shapes.AddChart.Select 
    ActiveChart.SetSourceData Source:=.Range("Sheet1!" & .Range(X1).Value & ":" & .Range(X2).Value & ",Sheet1!" & .Range(Y1).Value & ":" & .Range(Y2).Value) 
End With 

ActiveChart.ChartType = xlLine 



End Sub 

-

-

Answer 1

이 오프를 시작해야

With Sheets("Sheet1") 
    .Shapes.AddChart.Select 
    ActiveChart.SetSourceData Source:=.Range("Sheet1!" & .Range("K6").Value & ":" & .Range("K7").Value & _ 
             ",Sheet1!" & .Range("K8").Value & ":" & .Range("K9").Value) 
End With 
ActiveChart.ChartType = xlLine 

두 번째 대답

ActiveChart.SetSourceData Source:=.Range("Sheet1!" & X1 & ":" & X2 & ",Sheet1!" & Y1 & ":" & Y2)