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

파워포인트 VBA: 표 추가하기

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

파워포인트 VBA: 표 추가하기

많은 사람들이 파워포인트를 사용하여 프레젠테이션을 만들고 있습니다. 파워포인트의 기본 기능도 강력하지만, VBA(Visual Basic for Applications)를 사용하면 파워포인트의 기능을 더욱 확장시킬 수 있습니다. 이번 포스팅에서는 VBA를 사용하여 파워포인트에 표를 추가하는 방법에 대해 알아보겠습니다.

VBA 소개

VBA는 파워포인트에서 사용되는 프로그래밍 언어로, 파워포인트의 기능을 보완하거나 자동화하는데 사용됩니다. VBA를 사용하면 파워포인트에 사용자 정의 함수를 만들거나, 기존 기능의 동작을 수정할 수 있습니다. VBA는 윈도우에서 기본적으로 제공되는 Visual Basic과 유사한 문법을 가지고 있어 다루기 쉽습니다.

표 추가하기

파워포인트에 표를 추가하려면 먼저 "Developer" 탭을 활성화해야 합니다. 개발자 탭을 활성화하는 방법은 다음과 같습니다.

  1. 파워포인트를 실행합니다.
  2. 메뉴 바에서 "파일"을 클릭한 후 "옵션"을 선택합니다.
  3. 왼쪽 메뉴에서 "리본 사용자 지정"을 클릭합니다.
  4. "주 메뉴에서 개발자 탭에 엑세스할 수 있도록 체크합니다.
  5. "확인"을 클릭하여 설정을 저장합니다.

이제 개발자 탭이 활성화되면 다음 단계를 따라 표를 추가할 수 있습니다.

  1. 개발자 탭에서 "Visual Basic"을 클릭합니다. VBA 편집기가 실행됩니다.
  2. 좌측 창에서 파워포인트 프레젠테이션을 선택합니다.
  3. 솔루션 탐색기에서 "이 PC\PPT 템플릿"을 선택합니다.
  4. 하단의 코드 편집기에서 다음 코드를 입력합니다.
Sub AddTable()
    Dim slide As Slide
    Set slide = ActiveWindow.View.Slide

    Dim table As Shape
    Set table = slide.Shapes.AddTable(3, 4, 100, 150, 300, 200)
    
    table.Table.Cell(1, 1).Shape.TextFrame.TextRange.Text = "Header 1"
    table.Table.Cell(1, 2).Shape.TextFrame.TextRange.Text = "Header 2"
    table.Table.Cell(1, 3).Shape.TextFrame.TextRange.Text = "Header 3"
    table.Table.Cell(1, 4).Shape.TextFrame.TextRange.Text = "Header 4"
    
    table.Table.Cell(2, 1).Shape.TextFrame.TextRange.Text = "Content 1"
    table.Table.Cell(2, 2).Shape.TextFrame.TextRange.Text = "Content 2"
    table.Table.Cell(2, 3).Shape.TextFrame.TextRange.Text = "Content 3"
    table.Table.Cell(2, 4).Shape.TextFrame.TextRange.Text = "Content 4"
    
    table.Table.Cell(3, 1).Shape.TextFrame.TextRange.Text = "Content 5"
    table.Table.Cell(3, 2).Shape.TextFrame.TextRange.Text = "Content 6"
    table.Table.Cell(3, 3).Shape.TextFrame.TextRange.Text = "Content 7"
    table.Table.Cell(3, 4).Shape.TextFrame.TextRange.Text = "Content 8"
End Sub
  1. 코드 편집기에서 "F5" 키를 눌러 코드를 실행합니다. 현재 슬라이드에 3행 4열의 표가 추가됩니다.
  2. 표의 각 셀에 원하는 텍스트를 입력하면 됩니다.

프레젠테이션에 표를 추가하는 방법을 알아보았습니다. VBA를 사용하면 더 복잡한 표를 생성하거나, 셀의 스타일을 변경하고, 데이터를 동적으로 입력하는 등 다양한 작업을 할 수 있습니다.

마무리

이번 포스트에서는 파워포인트 VBA를 사용하여 표를 추가하는 방법에 대해 알아보았습니다. VBA를 활용하면 파워포인트의 기능을 확장하여 좀 더 효과적인 프레젠테이션을 만들 수 있습니다. 앞으로 더 다양한 VBA 기능을 살펴보겠습니다. 감사합니다.