메일 발송시, 참조에 본인이 빠져서,
발송 메일은 의외로 관리하기가 쉽지 않다.
꼼수로, 아웃룩 숨은참조에 본인 메일 주소 넣기
아웃룩을 키고 Alt + F11 을 누르면
매크로 삽입 이 가능하다.
내용에 본인 메일주소를 넣고 저장하면 끝
========================================================================
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
========================================================================
'Mail' 카테고리의 다른 글
Relaying denied. IP name lookup failed 메일 반송 (0) | 2013.10.15 |
---|