[엑셀VBA] 명령 단추(버튼) 취소 기능 만들기 CommandButton

안녕하세요. 춤추는초코칩입니다.

엑셀을 하면, 수많은 클릭을 합니다. 그중에서도 확인과 취소와 같은 버튼을 많이 클릭하죠.

오늘은 이 버튼을 만들어 보도록 하겠습니다.

1. 명령 단추 추가하기

버튼은 보통 명령 단추를 이야기합니다.

우선, 삽입에서 사용자 정의 폼을 선택합니다.

사용자 정의 폼에서 "명령 단추"를 추가합니다.

추가한 명령 단추는 아래와 같이 보이게 됩니다.

2. 기능 추가하기

명령 단추는 클릭할 때, 이벤트가 발생하는 것이 일반적입니다.

해당 버튼에 취소 기능인 창을 닫는 기능을 추가해 보겠습니다.

명령 단추를 더블클릭해서 코딩 창으로 이동합니다.

이동한 코딩 창에는 Commandbutton1_Clikc이라고 되어 있습니다.

버튼을 클릭했을 때, 실행됩니다.

여기에 아래와 같이 작성해보겠습니다.

Private Sub CommandButton1_Click()

    Unload Me
    
End Sub

해당 코드를 실행하며, 창이 닫기를 것을 확인할 수 있습니다.

참고로 사용자 정의 폼을 실행하는 명령문은 Show입니다.

Sub openUserForm()

    UserForm1.Show
    
End Sub