반응형
아웃룩을 사용하시다 보면 제목을 넣지 않고 보내는 경우가 가끔 발생하죠..
따로 체크해 주는 옵션이 있는 것도 아니고 그렇다고 실수는 하기 싫고~
그럴 땐 VB를 이용해서 하는 방법이 있습니다.
(참고로 아웃룩 2010까지는 가능하지만 2013은 모르겠네요)
아웃룩 실행 화면에서 Alt + F11을 누르세요.
그러면 아래와 같은 화면이 나옵니다.
아래 화면에 스크립트를 넣어주시고 Ctrl+S 로 저장해주세요.
Private Sub Application_Itemsend(ByVal Item As Object, Cancel As Boolean)
Dim strMessage As String
If Len(Trim(Item.Subject)) = 0 Then
strMessage = "'제목없음'으로 메일을 보내시겠습니까?"
If MsgBox(strMessage, vbYesNo + vbQuestion + vbMsgBoxSetForeground, "제목 확인") = vbNo Then
Cancel = True
End If
End If
End Sub
소스 다운로드 :
이메일 제목없이 보내기 방지 소스.txt
빠져 나오시고 Tool(툴) -> Macro 에서 Security를 클릭하세요.
Warnings for all macros 를 선택해주시면 끝이네요 ^^
아래는 테스트 화면입니다.
반응형
'Window or Office tip' 카테고리의 다른 글
| [Microsoft Office] MS 오피스 프로페셔널 플러스 2021 다운로드 & 제품 인증 (0) | 2023.03.05 |
|---|---|
| 숨김폴더 만드는 방법 (0) | 2015.12.21 |
| 대기모드에서 다시 돌아오지 않을 때 (0) | 2015.09.07 |
| [Windows 10] 불법 윈도우 업그레이드에 대한 FAQ (0) | 2015.08.27 |
| 윈도우10 설치시 0xC1800103 - 0x90002 에러 났을 경우 (2) | 2015.08.06 |