Is Emailing a shortcut to a file possible in vba?

Wook · Mar 30th, 2004, 03:45 PM

Hi all,
Anyone know how to email a shortcut to a file, I know attacting a whole file is fairly easy, but attaching a shortcut...?

ta Wook

Davers · Mar 30th, 2004, 04:17 PM

Hello...I think this will do it...

Code:

Dave

P.S. This was taken directly from Outlook's help file...they give a list of all the different things you can link...

Davers · Mar 30th, 2004, 04:20 PM

And after re-reading...did I mis-understand your question? You would just type the address as I've shown above into the body of the e-mail...did you want to do that through code?

Sorry if I mis-understood,

Dave

Wook · Mar 31st, 2004, 11:56 AM

Hi Davers, sorry for the late reply.

Sorry I don't think I explained myself very well.

I need something like the below - which when run in excel creates a email and attaches a file. But instead of attaching a file I need to attach a shortcut file pointing to its location - actual file too big to email!

Any thoughts?

Set olookApp = CreateObject("Outlook.Application")
Set mailnewmail = olookApp.CreateItem(olMailItem)
Set myAttachment = mailnewmail.Attachments
With mailnewmail
.To = "Address"
.Subject = ActiveWorkbook.Name
.Display
End With
myAttachment.Add FilePath & "\" & FileName & ".xls"

Mar 30th, 2004, 03:45 PM	#1
Wook Join Date: Apr 2003 Posts: 75	Is Emailing a shortcut to a file possible in vba? Hi all, Anyone know how to email a shortcut to a file, I know attacting a whole file is fairly easy, but attaching a shortcut...? ta Wook

Mar 30th, 2004, 04:17 PM	#2
Davers Join Date: Sep 2002 Location: Michigan Posts: 1,132	Re: Is Emailing a shortcut to a file possible in vba? Hello...I think this will do it... Code: Dave P.S. This was taken directly from Outlook's help file...they give a list of all the different things you can link... __________________ Using Windows XP with Office XP

Mar 30th, 2004, 04:20 PM	#3
Davers Join Date: Sep 2002 Location: Michigan Posts: 1,132	Re: Is Emailing a shortcut to a file possible in vba? And after re-reading...did I mis-understand your question? You would just type the address as I've shown above into the body of the e-mail...did you want to do that through code? Sorry if I mis-understood, Dave __________________ Using Windows XP with Office XP

Mar 31st, 2004, 11:56 AM	#4
Wook Join Date: Apr 2003 Posts: 75	Re: Is Emailing a shortcut to a file possible in vba? Hi Davers, sorry for the late reply. Sorry I don't think I explained myself very well. I need something like the below - which when run in excel creates a email and attaches a file. But instead of attaching a file I need to attach a shortcut file pointing to its location - actual file too big to email! Any thoughts? Set olookApp = CreateObject("Outlook.Application") Set mailnewmail = olookApp.CreateItem(olMailItem) Set myAttachment = mailnewmail.Attachments With mailnewmail .To = "Address" .Subject = ActiveWorkbook.Name .Display End With myAttachment.Add FilePath & "\" & FileName & ".xls"

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode