본문 바로가기
■ 칼퇴를 위한 VBA : 사례/- VBA for 파워포인트

파워포인트 VBA: 그래프 스타일 변경하기

by 포탈메이커 2023. 6. 30.

파워포인트 VBA: 그래프 스타일 변경하기

파워포인트 VBA를 사용하면 그래프의 스타일을 동적으로 변경할 수 있습니다. 이 글에서는 파워포인트 VBA를 사용하여 그래프의 스타일을 변경하는 방법에 대해 알아보겠습니다.

그래프 스타일 변경을 위한 VBA 코드

파워포인트 VBA를 사용하면 그래프 객체의 속성을 이용하여 각종 스타일을 변경할 수 있습니다. 예를 들어, 그래프의 색상, 선 스타일, 글꼴 등을 코드로 변경할 수 있습니다.

아래는 그래프의 색상을 변경하는 예제 코드입니다.

Sub ChangeGraphStyle()
    Dim slide As Slide
    Dim shape As Shape
    Dim chart As Chart
    Dim series As Series
    
    ' 첫 번째 슬라이드의 그래프 찾기
    Set slide = ActivePresentation.Slides(1)
    For Each shape In slide.Shapes
        If shape.HasChart Then
            Set chart = shape.Chart
            Exit For
        End If
    Next shape
    
    ' 그래프의 시리즈 색상 변경
    For Each series In chart.SeriesCollection
        series.Format.Fill.ForeColor.RGB = RGB(255, 0, 0) ' 빨간색
    Next series
End Sub

위의 코드는 첫 번째 슬라이드의 그래프를 찾아서 시리즈의 색상을 빨간색으로 변경하는 예제입니다. RGB() 함수를 사용하여 원하는 색상을 지정할 수 있습니다. 위의 예제에서는 빨간색(RGB(255, 0, 0))을 사용했습니다.

이 외에도 그래프의 선 스타일, 두께, 글꼴 등을 변경할 수 있습니다. 코드 내에서 원하는 속성 값을 변경하면 해당 속성이 적용됩니다. 예를 들어, series.Format.Line을 사용하면 선의 스타일과 두께를 변경할 수 있습니다. series.Format.TextFrame2.TextRange.Font를 사용하면 글꼴을 변경할 수 있습니다.

VBA 코드 실행 방법

위의 예제 코드를 사용하기 위해서는 다음과 같은 단계를 따라야 합니다.

  1. 파워포인트를 열고 VBA 편집기를 엽니다. (Alt + F11)
  2. 메뉴에서 "삽입 > 모듈"을 선택하여 새 모듈을 추가합니다.
  3. 모듈에 예제 코드를 복사하여 붙여넣습니다.
  4. "실행 > 실행 서브" 명령을 사용하거나 F5 키를 눌러 코드를 실행합니다.

마무리

이렇게 파워포인트 VBA를 사용하여 그래프의 스타일을 변경하는 방법을 알아보았습니다. VBA를 이용하면 동적으로 그래프의 스타일을 변경할 수 있으며, 이를 통해 보다 다양한 그래프 효과를 구현할 수 있습니다. 각종 속성을 조합하여 원하는 스타일을 만들어보세요!