티스토리 뷰
1. 아웃룩에서 Alt + F11 눌러 Visual Basic Editor 실행
2. 좌측 프로젝트창에서 Project1 - Microsoft Outlook 개체 - ThisOutlookSession 선택
3. 우측 Editor창에 아래 내용 작성한 뒤 저장
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
'IT > OFFICE' 카테고리의 다른 글
엑셀 년 주차, 월 주차 구하기 (0) | 2017.03.14 |
---|
댓글