Basic code to open new email in outlook

[Cremorneguy]

Hi there,

I have a command button in place, where when someone clicks it I want it to open up a new email using outlook. I want the most basic macro for it so I might be able to edit it later. Does anyone know what the macro code should be?

Thanks

[den_1985]

Hi,

Sub Macro1()
Shell ("OUTLOOK")
End Sub

[ash3angel]

hi den, i think his referring to create a open new e-email message, and i too was looking for it. thanks

[Joe Bushfield]

Sub Create_Open()
'Creates a new e-mail item and modifies its properties'

    Dim olApp As Outlook.Application
    Dim objMail As Outlook.MailItem
    Set olApp = Outlook.Application
    'Create e-mail item'
    Set objMail = olApp.CreateItem(olMailItem)

    With objMail
        '.Subject = "Subject"
        '.Body = ""
        '.Recipients.Add "abd@def.com"
        .Display
    End With
    'objMail.Send
    
End Sub

I have commented out some elements, but thought that they may be of use

[ash3angel]

this is a great help, what f you a template in excel and the email adress is in excel how can i reference a cell for recipient and subject? also the emai body
thanks n advance