한토스(주)

Mail Faq | MS Outlook 숨은참조로 보내기

페이지 정보

작성자 최고관리자 작성일15-08-27 08:42

본문

1. Outlook을 실행하고, ALT + F11 을 눌러 VBA 코드 창을 실행합니다.
2. 아래코드를 VBA 코드창의 현재 아웃룩 세션 (ThisOutlookSession)에 입력
3. user@where.com 부분을 숨은 참조로 받을 이메일로 변경.
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
4. 따로 저장하기는 없고, 창을 닫은 후 아웃룩을 종료하면 그 때 저장 버튼 누름. (종료 후 재시작시에 적용)
5. [도구]-[매크로]-[보안]- "매크로에 대한 보안 검사 않함"을 선택


출처 : http://egloos.zum.com/tmt313/v/2510380