Outlook and Excel

[ralfp]

I need to be able to create outlook emails from a spreadsheet.

I got the following to work:

Sub Test()
Dim olApp As Object, olMail As Object

Set olApp = CreateObject("Outlook.Application")
Set olMail = olApp.CreateItem(0)
olMail.To = "Anyone@anywhere.com"
olMail.Body = Range("a1")

olMail.Display

AppActivate "Microsoft Excel"

End Sub


But im having trouble selecting the range that i trully need.

I need to be able to select a3:d17.

How would in do that?

Thanks,

Armando P