Outlook Auto BCC

프로그램도 있긴 한데, 유료
무료는 15일
썬더버드는 기본 기능에 있는...
회사에서는 아웃룩을 사용 하니까

1. Outlook을 실행시킨다.
2. Alt + F11을 누른다.
3. Project1 - Microsoft Office Outlook Object - ThisOutlookSession 을 더블 클릭한다.

Editor Window에 아래와 같은 내용을 입력한다.

Private Sub Application_ItemSend(ByVal Item As Object, Cancle As Boolean)
    Dim objMe As Recipient
    Set objMe = Item.Recipients.Add(Item.Session.CurrentUser.Address)
    objMe.Type = olBCC
    objMe.Resolve
    Set objMe = Nothing
End Sub

-ps-
1. 보안 문제가 있을 경우 Office Tools에 VBA 프로젝트용 디지털인증서를 작성한다.
2. 작동이 안될경우 Item.Session.CurrentUser.Address 부분을 자신의 메일계정을 입력해준다.