Excelセルの値を.SetSourceDataの範囲

Question

.SetSourceDataメソッドの範囲の入力としてセルの値を使用している問題があります。私のセルの値は次のとおりです。

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

だから、私はK6とK7（$ C $ 95：$ C $ 137）のエントリを使用して、新しいラインチャートを作成たいと思いX値として、及びK8やK9のエントリ（$ F $ 95：$ F $ 137）をY値として使用します。

私はハードコードこのよう.SetSourceData範囲内のエントリ、それが動作する場合：

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

が、IVEは範囲として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)