[Excel][VBA] 차트 원본 데이터 변경

■ 차트의 계열 수식

=SERIES(series_name, category_labels, values, order, sizes)

series_name : 범레에 표시되는 계열의 이름이 있는 셀, 범위를 참조

category_labels : 계열의 가로 축이 있는 범위를 참조

values : 계열의 값이 있는 범위를 참조

order : 계열의 순서를 지정하는 정수

sizes : 거품형 차트에만 적용

Sub UpdateChart()     Dim ChtObj As ChartObject     Dim UserRow As Long     Set ChtObj = ActiveSheet.ChartObjects(1)     UserRow = ActiveCell.Row     If UserRow < 4 Or IsEmpty(Cells(UserRow, 1)) Then         ChtObj.Visible = False     Else         ChtObj.Chart.SeriesCollection(1).Values = _            Range(Cells(UserRow, 2), Cells(UserRow, 6))         ChtObj.Chart.ChartTitle.Text = Cells(UserRow, 1).Text         ChtObj.Visible = True     End If End Sub

Private Sub CheckBox1_Click()     If CheckBox1 Then         Call UpdateChart         ActiveCell.Select     End If End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)     If CheckBox1 Then Call UpdateChart End Sub

chart active cell.xlsm

0.05MB

■ 차트의 데이터 범위 알아내기

get series ranges.xlsm

0.04MB