The easiest way is to let Excel find the default mail program and set
up the message:

Sub AAA()
Dim Addr As String
Dim Subj As String
Addr = "
Subj = "This is the subject"
ThisWorkbook.FollowHyperlink "mailto:" & Addr & _
"?subject=" & Subj
End Sub

Cordially,
Chip Pearson
Microsoft Most Valuable Professional
Excel Product Group, 1998 - 2009
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)



On Tue, 12 May 2009 08:52:02 -0700 (PDT), "J.W. Aldridge"
wrote:

Is there a way to create a code that at the click of a button, ask a
user "Are you at a terminal where you use Outlook Email ?"

If answer is yes, open their outlook email (despite default user
settings) and set up an email to a specific email address.

If no, then open their default email and set up an email to specific
email address.