Please Enable JavaScript!
Gon[ Enable JavaScript ]

엑셀 VBA 함수 만들어서 매크로와 연결하기

엑셀(Excel)/Excel
반응형

워크시트에서 사용하고 있는 함수와 수식은 VBA 코드에서도 적용할 수 있습니다. 수식 문자열을 Formula 라는 변수에 입력하면 바로 실행이 됩니다. 이 기능을 이용해서 많은 연산을 버튼 클릭 한번으로 수행할 수 있습니다. 오늘은 버튼과 매크로 함수를 연결해서 워크시트에 수식들을 한번에 수행하는 방법에 대해 알아 보겠습니다.

 

 

먼저 합계 버튼을 만들어 보겠습니다. 버튼은 컨트롤 도구 입니다. [개발 도구] > [삽입] 리본 메뉴를 클릭해 보세요. 팝업에 양식 컨트롤이 나타나면 버튼 아이콘을 적당한 위치에 만듭니다.

엑셀 Excel 엑셀 함수를 이용한 매크로 만드는 방법

 

버튼을 생성하는 순간 [매크로 지정] 팝업창이 뜹니다. 매크로 이름 란에 실행할 함수명을 입력합니다. 그리고 오른쪽으로 가서 [새로 만들기] 버튼을 클릭합니다

엑셀 Excel 엑셀 함수를 이용한 매크로 만드는 방법

아래는 참고하면 좋을 만한 글들의 링크를 모아둔 것입니다.
엑셀 Excel 매크로 실행과 소스 편집하기
엑셀 Excel 간단하게 자동 매크로 만들기
엑셀 Excel VBA 개발을 위한 개발 도구 탭 추가하기
엑셀 Excel 매크로 소스 디버깅으로 결과 확인하기
엑셀 Excel 엑셀 함수를 이용한 매크로 만드는 방법

 

 

 

다음은 자동으로 Visual Basic Editor 편집창이 열립니다. 화면에는 매크로 이름으로 함수가 만들어져 있을 겁니다. 이 함수에 수행할 소스를 넣어야겠죠. 소스는 다음과 같습니다

엑셀 Excel 엑셀 함수를 이용한 매크로 만드는 방법

 

소스는 간단합니다. 첫 번째 행에 있는 Range("C8").Select Select 속성을 이용해서 셀을 선택합니다. 이곳이 Formula 변수에 들어갈 수식이 실행될 셀 입니다. 

 

Range("C8").Select

 

 

두 번째는 워크시트의 수식 입력에서 했던 것처럼 합계 함수를 문자열로 Formula 에 입력해야 합니다. 수식에 입력했던 것과 동일하게 실행됩니다. 동일하죠 

 

ActiveCell.Formula = "=SUM(C3:C7)"

 

 

이런 두 가지 과정을 반복해서 전체 합계를 구하는 것입니다. 계산할 수식이 많을 경우 버튼 한번으로 간단하게 실행할 수 있겠죠. 전체 소스는 아래와 같습니다. 

 

Sub 전체합계_Click()
    Range("C8").Select
    ActiveCell.Formula = "=SUM(C3:C7)"
    Range("D8").Select
    ActiveCell.Formula = "=SUM(D3:D7)"
    Range("E8").Select
    ActiveCell.Formula = "=SUM(E3:E7)"
    Range("F8").Select
    ActiveCell.Formula = "=SUM(F3:F7)"
End Sub

 

 

매크로 함수를 실행한 결과는 다음과 같습니다

엑셀 Excel 엑셀 함수를 이용한 매크로 만드는 방법

아래는 참고하면 좋을 만한 글들의 링크를 모아둔 것입니다.
엑셀 Excel 매크로 실행과 소스 편집하기
엑셀 Excel 간단하게 자동 매크로 만들기
엑셀 Excel VBA 개발을 위한 개발 도구 탭 추가하기
엑셀 Excel 매크로 소스 디버깅으로 결과 확인하기
엑셀 Excel 엑셀 함수를 이용한 매크로 만드는 방법
반응형
Posted by 녹두장군

댓글을 달아 주세요