Public Sub CreateMail()
'Creates a new e-mail item and modifies its properties.
Dim olApp As Outlook.Application
Dim objMail As MailItem
Set olApp = Outlook.Application
'Create mail item
Set objMail = olApp.CreateItem(olMailItem)
With objMail
'Set body format to HTML
'.BodyFormat = olFormatHTML
.To = "test@mail.com"
'.CC = "test@mail.com"
.Subject = "제목 테스트"
.Body = "내용" & vbCrLf & "내용"
.Display
End With
End Sub
'Tip & Tech' 카테고리의 다른 글
| 닌텐도 DS로 인터넷 전화하는 방법 (4) | 2007/09/26 |
|---|---|
| Yahoo! Design Innovation Team 에서 제작한 Traffic Map (0) | 2007/09/20 |
| [Outlook - VBA] Creates a new e-mail item and modifies its properties (0) | 2007/06/15 |
| SelfCert를 사용하여 VBA 프로젝트에 대한 디지털 인증서 만들기 (0) | 2007/06/15 |
| T-money 카드 등록하고, 교통비도 소득공제 혜택 받으세요~ (0) | 2007/05/31 |
| Subst - Associates a path with a drive letter (0) | 2007/05/25 |
이올린에 북마크하기
댓글을 달아 주세요