Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Sending Active Workbook thru Excel

Status
Not open for further replies.

RandDUser

Technical User
Feb 24, 2005
65
US
In Excel, I want to send the active wrokbook to a specific address via Outlook. Here is the code I have:

Sub Object15_Click()
' MACRO to email completed doc to specified Outlook Inbox
ActiveWorkbook.SendMail _
Recipients:="joe@somewhere.com", _
Subject:="Active_Workbook"
End Sub

Now, the code works fine, but instead of it automatically sending the document, I want a new email message window to pop up that has the attachment in it so the user can send the email. Any suggestions?

Thanks!
 
Those links were helpful, thank you. 1 more question. I have a cell in the worksheet that the user types in a file path to attach another document aside from the active workbook, but when I run it, I get an error. Here is the code:

.Attachments.Add ActiveWorkbook.FullName '(this works)
.Attachments.Add ws.Range("C44").Value ' ( this produces an error)

Am I missing something in the second line of code?

Thanks!
 
What is the value exactly in ws.Range("C44")?

-----------
Regards,
Zack Barresse
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top