상세 컨텐츠

본문 제목

Outlook에 VBA를 사용하여 자동으로 숨은참조 (BCC) 넣어서 Email 보내기

Sci/Tech

by firstlove 2010. 2. 22. 22:56

본문



저 Outlook을 실행하고, ALT + F11 을 눌러 VBA 코드 창을 실행합니다.


아래코드를 VBA 코드창의 현재 아웃룩 세션 (ThisOutlookSession)에 넣고 저장하면 지정
한 Email 주소로 숨은참조로 이메일이 보내집니다.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMe As Recipient
    Set objMe = Item.Recipients.Add("user@where.com")
    objMe.Type = olBCC
    objMe.Resolve
    Set objMe = Nothing
End Sub

관련글 더보기