• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Email Active-workbook Attachment VBA Code in Mac system

JitendraKushwah

New Member
Hi Friends,

I am having problem in Excel VBA code for mac system. The actual requirement is active workbook will attached in mail(As Draft). But we could not do in vba. Even though I already done this task for windows. therefore I need for your help or suggestion. For the reference I am attaching below window Vba Code.

Code:
Sub AttachFileToEmail()
    Dim OutApp As Object
    Dim OutMail As Object

    'Set OutApp = CreateObject("Outlook.Application")
    'Set OutMail = OutApp.CreateItem(0)
   
    ActiveWorkbook.Save

    On Error Resume Next
   
    ActiveWorkbook.SendMail "jitendra.kushwah@actiknow.com"
    With OutMail
        .To = "vinay.singh@actiknow.com"
        .Subject = "Memphis COD Order"
        .Attachments.Add ActiveWorkbook.FullName
        .Display
    End With

    Set OutMail = Nothing
    Set OutApp = Nothing
End Sub
 
Last edited by a moderator:
Yes, I googled. the above is not opening in my end. If you don't mind then please send me contents. So at least I will try my end. For your information I tried many times to get this link.
 
JitendraKushwah
What is not opening?
There are few possibilities, but You should know which of those You could use. I cannot know which You could/would use.
I try add same link below ( take those spaces away before use it )
https: // www.rondebruin.nl / mac / mail.htm
 
Back
Top