email bummer

itsglitzy

Registered User.
Local time
Today, 16:36
Joined
Nov 12, 2004
Messages
30
hi i have a lable which opens up outlook, how do i populate the subject and message area

Private Sub Label9_Click()
Dim Subj As String
Link = "mailto:seenan.marc@bsksyb.com"

On Error GoTo NoCanDo
ActiveWorkbook.FollowHyperlink Address:=Link, NewWindow:=True
'Unload Me
Exit Sub
NoCanDo:
MsgBox "Cannot open " & Link
End Sub

this is what im using at the mo :confused:
 
Do a search for Email SendObject - the topic of emails crops up regularly.

Col
 
If you are using the Application.FollowHyperlink method with the Mailto: command then you can use this to auto fill the email address, subject and memo body...

Code:
Application.FollowHyperlink "[COLOR=Blue]mailto:[/COLOR]seenan.marc@bsksyb.com[COLOR=Blue]?subject=[/COLOR]Testing 123[COLOR=Blue]&body=[/COLOR]Hello!", , True
 
you guys

sincerest thanks to all who posted and helped you have helped me escape the mgt b.s and hassle top guys....keep up the good work :D
 

Users who are viewing this thread

Back
Top Bottom