email by vba .display : .save. : .close the created email draft

[drom]

Hi and Thanks in advance!

When I want to sent a mail using outlook and VBA I can use:

With OutMail
            .to = "peter123456@gmail.com"
            .CC = "peter123457@gmail.com"
            .BCC = "peter123458@gmail.com"
            .Subject = "My Name is Blas!"
            .HTMLBody = RangetoHTML(Source)
            .Attachments.Add ("C:\test1.txt")
            .Attachments.Add ("C:\test2.txt")
            .Display   'or use .Send
            .Save
            .Close 'close the created and saved draft mail???????????????????????????????
        End With

but how can I revert
OutMail.display to close the created draft mail after saving it?
PS:
I know how to save in draft, but my question is how can I display, save and then close

I need to display because I have to paste a few images and without .display does not work properly

so question:
.display: .save: .close ???

 

[paulxmw]

Hi

How about inserting

Dim Delay As String

then

' add delay time        hh:mm
Delay = Now + TimeValue("00:05")

just before Set Outmail
you could then edit the emails in the outbox before they are sent

this will also save you using .Display,, so saving you time

Paulxmw