주소 이름을 사용하여 이메일 메시지를 만들려면 어떻게해야합니까?

Question

나는 아래의 예를 따랐다.

https://www.slipstick.com/developer/create-a-new-message-using-vba/

나는 자동으로 이메일 초안을 만들 때 주소록의 이름을 표시합니다.

예를 들어,이 경우,

나는 주소 필드에 " BZ@gmail.com"표시 할 수 있어요하지만 난 "비즈니스 팀"이 때문에 주소록의 이름을 "비즈니스 팀"을 표시 할 쉽게 볼 수 있습니다.

여기 내 코드입니다. 예제 코드와 거의 같습니다. 나는 열린 초안을 볼 때

Public Sub CreateNewMessage() 
Dim objMsg As MailItem 

Set objMsg = Application.CreateItem(olMailItem) 

With objMsg 
    .To = "Alias@domain.com" 
    .CC= "Alias2@domain.com" 
    .BCC = "Alias3@domain.com" 
    .Subject = "This is the subject" 
    .Categories = "Test" 
    .VotingOptions = "Yes;No;Maybe;" 
    .BodyFormat = olFormatPlain ' send plain text message 
    .Importance = olImportanceHigh 
    .Sensitivity = olConfidential 
    .Attachments.Add ("path-to-file.docx") 

' Calculate a date using DateAdd or enter an explicit date 
    .ExpiryTime = DateAdd("m", 6, Now) '6 months from now 
    .DeferredDeliveryTime = #8/1/2012 6:00:00 PM# 

    .Display 
End With 

Set objMsg = Nothing 
End Sub 

내가 보낼 수있는 단지로는 "alisas@domain.com은"와, 이메일 주소가 표시됩니다.

초안에 주소록 이름을 표시하려면 어떻게해야합니까?

Answer 1

질문의 첫 번째 부분은 Recipients.Add Method (Outlook)을 참조하십시오.

CC의 경우 수취인 유형을 변경해야합니다. 이에 대한 답변은 SO question을 참조하십시오.