Excel VBA : x, f (x)를 실행하는 산점도가있는 매크로를 기록하지만 매크로를 실행하면 항상 X와 F (x)가 별도의 함수로 표시됩니다.

Question

내가 말했던 것처럼 데이터 집합이 있습니다. 간단한 x 열 다음에 함수 인 f (x) 열. 내 매크로를 기록 할 때 각 열에 대해 x, f (x) 및 아래의 20 개 값을 선택하고 산점도를 선택하면 원하는 그래프가 출력되고 f는 x의 함수로 작용합니다.

매크로를 실행하면 항상 산점도가 출력되지만 f (x)를 x의 함수로 그래프로 표시하는 대신 독립 시리즈로 두 숫자 세트를 표시합니다. 나는 그것을 어떻게 바꿀 수 있는지 알 수 없다. 여기

내 코드입니다 :

Sub insertGraph() 
' 
' insertGraph Macro 
' 

' 
Range("A4:B25").Select 
ActiveSheet.Shapes.AddChart.Select 
ActiveChart.SetSourceData Source:=Range("'Sheet5'!$A$4:$B$25") 
ActiveChart.ChartType = xlXYScatterSmoothNoMarkers 
End Sub 

Answer 1

설정 ChartType 당신은 설정하기 전에 SetSourceData

일어나는 것은 AddChart 및 또는 SetSourceData 더 X가없는 기본 유형 (열)의 도표를 생성하는 것입니다 뭐죠 축 데이터이므로 두 열로 A와 B 열을 그립니다. 분산 형으로 변경하면이 두 시리즈가 유지됩니다.

또한 Select을 사용하지 마십시오. 레코더는 사용할 개체를 찾는 데 적합하지만 끔찍한 코드를 생성합니다. 방법은 다음과 같습니다.

Sub insertGraph() 
    ' 
    ' insertGraph Macro 
    ' 
    Dim cht As Chart 
    Set cht = ActiveSheet.Shapes.AddChart(XlChartType:=xlXYScatterSmoothNoMarkers).Chart 
    With cht 
     .SetSourceData Source:=Range("A4:B25") 
     ' add additional code to set other properties of the chart... 

    End With 
End Sub