그래픽 시각화는 분석가가 자신의 결과를 공유하는 방법의 정점이며 이를 조작할 수 있는 능력을 보유하는 것이 이 분야의 핵심입니다. 데이터 분석가인 우리는 그래프를 만드는 데 많은 시간을 할애하기 때문에 그래프를 자동화하는 방법을 이해하는 것이 그 어느 때보다 중요합니다.
▶ Sample Code
■ 적용 가능 한 Chart Type
- 묶은 세로 막대형 : xlColumnClustered
- 누적 세로 막대형 : xlColumnStacked
- 100% 기준 누적 세로 막대형 : xlColumnStacked100
- 꺾은 선형 : xlLine
- 누적 꺾은 선형 : xlLineStacked
- 100% 기준 누적 꺾은 선형 : xlLineStacked100
- 표식이 있는 꺾은 선형 : xlLineMarkers
- 표식이 있는 누적 꺾은 선형 : xlLineMarkersStacked
- 표식이 있는 100% 기준 누적 꺾은 선형 : xlLineMarkersStacked100
- 원형 : xlPie
- 쪼개진 원형 : xlPieExploded
- 쪼개진 3차원 원형 : xl3DPieExploded
- 원형 대 원형 : xlPieOfPie
- 원형 대 가로 막대형 : xlBarOfPie
- 묶은 가로 막대형 : xlBarClustered
- 누적 가로 막대형 : xlBarStacked
- 100% 기준 누적 가로 막대형 : xlBarStacked100
- 영역형 : xlArea
- 누적 영역형 : xlAreaStacked
- 100% 기준 누적 영역형 : xlAreaStacked100
- 분산형 : xlXYScatter
- 직선 및 표식이 있는 분산형 : xlXYScatterLines
- 직선이 있는 분산형 : xlXYScatterLinesNoMarkers
- 곡선 및 표식이 있는 분산형 : xlXYScatterSmooth
- 곡선이 있는 분산형 : xlXYScatterSmoothNoMarkers
***Create Chart Sample******************************************************************************************
Sub CreateChart()
Dim rng As Range
Dim cht As Object
'차트에 대한 데이터 범위
Set rng = ActiveSheet.Range("A24:M27")
'Create a chart
Set cht = ActiveSheet.Shapes.AddChart2
'차트에 일부 데이터 제공
cht.Chart.SetSourceData Source:=rng
'차트 유형 결정
cht.Chart.ChartType = xlPie
End Sub
*********************************************************************************************************************
https://www.wallstreetmojo.com/vba-charts/
'VBA Code' 카테고리의 다른 글
(엑셀vba)Shell함수를 이용하여 해당사이트 또는 문서열기 (0) | 2022.10.10 |
---|---|
하위폴더 내의 모든 파일 정보 가져오기 -재귀 함수 (0) | 2022.10.05 |
FOR NETX 문 응용 (0) | 2022.09.16 |
사용자 정의 Sub 프로시저 (0) | 2022.09.15 |
재귀 함수 (0) | 2022.09.15 |