티스토리 뷰
Alt-F11 누르고 아래 내용 입력
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objMe As Recipient
Set objMe = Item.Recipients.Add("자기이메일주소")
objMe.Type = olBCC
objMe.Resolve
Set objMe = Nothing
End Sub
그리고 매크로가 실행이 안될때에는
https://www.extendoffice.com/ko/documents/outlook/1368-outlook-enable-disable-macros.html