View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
GS[_2_] GS[_2_] is offline
external usenet poster
 
Posts: 3,514
Default emailing from excel with Thundrbird

Lynz submitted this idea :
Is it posssible to email an excel worksheet either containing the email
address or with the address listed on another worksheet when my default
email client is thunderbird. I have Office 2003 on a win 7 machine and
Outlook appears to be corrupted. I could reinstall Outlook if necessary
for this project. Thank you
Lynz


This causes the default mail app to display its new message dialog with
email address and subject line filled in:

On Error Resume Next
ShellExecute 0&, vbNullString, _
?subject=SubjectLine" , _
vbNullString, vbNullString, vbNormalFocus
On Error GoTo 0

Requires:

Private Declare Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hWnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc