Excel File Link in Email MAC VBA

[Taramera]

Dears, Like many posts, I am also new for VBA
We created an Excel sheet with an Email Macro,,, where user(s) can send an email with file link to the next person for review or whatever... the code below is working perfect in PC Outlook but I am unable set it for MAC Users;

Sub Make_Outlook_Mail_With_File_Link()
Dim OutApp As Object
Dim OutMail As Object
Dim strbody As String


If ActiveWorkbook.Path <> "" Then
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)


strbody = "<font size=""3"" face=""Calibri"">" & _
"Below RFQ link for your review and action.<br><br>" & _
"<A HREF=""file://" & ActiveWorkbook.FullName & _
""">Link to the file</A>" & _
"<br><br>Thanks and Kind Regards,</font>"


On Error Resume Next
With OutMail
.to = ""
.CC = ""
.BCC = ""
.Subject = "RFQ #: " & Activesheet.Name & " | " & Activesheet.Range("D8") & " | " & Activesheet.Range("D13")
.HTMLBody = strbody
.Display
End With
On Error GoTo 0


Set OutMail = Nothing
Set OutApp = Nothing
Else
MsgBox "The ActiveWorkbook does not have a path, Save the file first."
End If
End Sub

Any timely help will be appreciated.

Thanks

 

[pbornemeier]

I don't have a Mac, so can't help directly. Perhaps this link can: Performing File and Folder Operations Programmatically in Excel 2011 for the Mac

 

[Jim Gordon]

Excel MVP Ron DeBruin has a web page dedicated to this topic. It’s here:
Mail from Excel and make/mail PDF files (Mac)

 

[Taramera]

Thanks Pbornemeier, I didn't achieved my objective but its helped a lot...!

Regards

 

[Taramera]

Hi, Jim Gordon --- I took this function from DeBruin's web... he has given the solution for Workbook and PDF email from MAC but there is no function for File Link [ file path / document path ]
Secondly, with this function, I cannot break the line in MAC Macro, whereas its working perfectly in PC [ text new lines / paragraphs ].

I would appreciate if I can get a solution for the same.

Regards

 

[Jim Gordon]

Are you trying to put multiple lines into the Subject field?
Is your objective to use the text from a file as the message body?

 

[Taramera]

YES multiple Cells Values [Text] will be in Subject Field
Message body text including current file link path are also written in VBA code.