그래픽 시각화는 분석가가 자신의 결과를 공유하는 방법의 정점이며 이를 조작할 수 있는 능력을 보유하는 것이 이 분야의 핵심입니다. 데이터 분석가인 우리는 그래프를 만드는 데 많은 시간을 할애하기 때문에 그래프를 자동화하는 방법을 이해하는 것이 그 어느 때보다 중요합니다.
▶ Sample Code
The VBA Coding Guide For Excel Charts & Graphs
In this Excel guide you will learn all about how to use VBA coding to create, modify, and delete charts within your Excel spreadsheet. Every section has simple VBA code examples that you can copy/paste into your code to quickly apply to your macros.
www.thespreadsheetguru.com
■ 적용 가능 한 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 VB.Net 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 |