insert into e-mail

gbaker · #1 03-03-2013, 11:17 AM

I have a code that opens a workbook and then put it into an e-mail to send out to whom ever needs it. I also would like to attached another workbook to that same e-mail and have not been able to make the code work. See code below and let me know what I can do to make this work. Thanks in

advance, GWB

Code:

Sub INSERTINTOEMAIL()
'
' INSERTINTOEMAIL Macro
'

'
    ChDir "\\fngn.com\us\Projects\Print Production\Calendars\2013_Excel_Version"
    Workbooks.Open Filename:= _
        "\\fngn.com\us\Projects\Print Production\Calendars\2013_Excel_Version\BNY_VIEWING_CALENDAR_2013.xls"
    Workbooks.Open Filename:= _
        "\\fngn.com\us\Projects\Print Production\Calendars\2013_Excel_Version\LIST VIEW BNY.xls"
    Application.Dialogs(xlDialogSendMail).Show
    ActiveWindow.Close
    ActiveWindow.Close
    Range("B5").Select
End Sub

Pecoflyer · #2 03-04-2013, 03:28 AM

Perhaps this link can help. Code is available

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

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Insert picture background in Word mail merge labels	obasanla	Mail Merge	6	11-26-2012 11:53 PM
Can not receive mail when using group mail in Microsoft Outlook 2007	nhat2nhat2	Outlook	0	10-09-2011 08:28 AM
Insert table button doesn't work in Outlook 2010 e-mail message	ironwoods	Outlook	0	08-02-2010 12:24 PM
Error: general mail failure. Quit excel restart mail system	MitchellDM	Outlook	1	12-19-2008 02:05 AM
Insert formatted table into word (mail merge)	manojbmsce	Mail Merge	0	09-25-2008 02:25 AM