Visual Basic 편집기를 시작하십시오.

프로젝트 창에서 원하는 프로젝트를 선택하십시오.

메뉴를 선택하여 새 클래스 모듈을 삽입합니다. 삽입 | 클래스 모듈.

새 클래스 모듈을 활성화하고 이름을 바꿉니다 (예 : AppEventClass 다음 예제 매크로를 복사하여 새 클래스 모듈에 붙여 넣으십시오.

Public WithEvents Appl As Application

Private Sub Appl_NewWorkbook(ByVal Wb As Workbook)

' your code here

MsgBox "A new workbook is created!"

End Sub

Private Sub Appl_WorkbookBeforeClose(ByVal Wb As Workbook, _

Cancel As Boolean)

' your code here

MsgBox "A workbook is closed!"

End Sub

Private Sub Appl_WorkbookBeforePrint(ByVal Wb As Workbook, _

Cancel As Boolean)

' your code here

MsgBox "A workbook is printed!"

End Sub

Private Sub Appl_WorkbookBeforeSave(ByVal Wb As Workbook, _

ByVal SaveAsUI As Boolean, Cancel As Boolean)

' your code here

MsgBox "A workbook is saved!"

End Sub

Private Sub Appl_WorkbookOpen(ByVal Wb As Workbook)

' your code here

MsgBox "A workbook is opened!"

End Sub

Application 개체에 대한 이벤트 매크로 편집을 마친 후 새 이벤트 매크로를 활성화하려면 ThisWorkbook 모듈에 몇 가지 코드를 추가해야합니다.

Dim ApplicationClass As New AppEventClass

Private Sub Workbook_Open()

Set ApplicationClass.Appl = Application

End Sub

Workbook_Open 프로 시저를 실행하면 Application 개체에 연결된 이벤트가 활성화됩니다.