Send E-mail link to a file (not the open Workbook)

[mesteptoe]

Example 1 on the following link on the "rondebruin" site sends the Active workbook by E-mail. How can I change the code to send a link to a completely different file, i.e. where and how do I insert a different file name?

Thank you

http://www.rondebruin.nl/mail/folder2/mail1.htm


</PRE>

 

[wigi]

Do you want a link to another file, or exactly the file be put in attachment of the email message?

 

[mesteptoe]

I want a link to the other file, as this would use less memory.

Thanks for your interest.

Graham

 

[wigi]

Look at Ron's tips page:

http://www.rondebruin.nl/mail/tips2.htm

under the heading "Use HTMLBody instead of Body". You will have to squeeze in the link instead of the URL example there.

 

[mesteptoe]

I've seen that but cannot work out what needs changing.

 

[wigi]

How far did you get - where did you get stuck?

 

[mesteptoe]

Well I can see there is a line,

"<A HREF=""file://" & ActiveWorkbook.FullName & _


I assume this needs to be changed. If the file I want to link to is located at C:\Documents and Settings\testfile how do I insert it?

But then there is another line which refers to ActiveWorkbook, i.e.

.Subject = ActiveWorkbook.Name
.HTMLBody = strbody

Do these need to be changed to refer to the new file?

Graham

 

[wigi]

This line:

.Subject = ActiveWorkbook.Name

just fills in the Subject of the email. If you want something else, well, change it:

.Subject = "my new subject"

In Ron's example I gave you, you see the link to his website:

"<A HREF=""http://www.rondebruin.nl/"">Ron's Excel Page</A>"

You need to change the http://www.rondebruin.nl/ for the location of your file. And change the Ron's Excel Page too...

 

[wigi]

I cannot assess what problems you have with changing the hard-coded elements, but here's an example (delete [ and ] in the line of code):

.htmlBody = "<[A HREF=""C:\test.txt"">test file<]/A>"

 

[mesteptoe]

Hi again

I've tried and tried but the macro locks up at the strbody section. It is listed as follows but the problem must be the file location,

strbody = "<font size=""3"" face=""Calibri"">" & _
"Hi Martin,<br><br>" & _
"I refer to this project and can confirm that I now consider the works to be Practically Complete. The date of this, and any outstanding works are listed on the 'PROJECT CLOSURE' spreadsheet for this project. A Stage 4 Safety Audit should be diarised to occur approximately 12 months from this date, and a Stage 4a at 36 months. Results of those Audits should be sent, in the first instance, to the Client Manager. <br>" & _
"<br>To open the file, Right Click on the name and select 'Open Hyperlink' : " & _
"<[A HREF=""[URL="file://\\artemis\transportation\Unit"]\\artemis\transportation\Unit[/URL] Information\Old Medusa Data\SECTION - UNITWIDE\PROJECT MANAGEMENT SYSTEM\poole qualitree.xlsm "">test file<]/A>" & _
"<br><br>Regards," & _
"<br><br>ENTER YOUR NAME HERE</font>" £ _