Run this when your worksheet with the table is active. In the above macro, how would you recommend getting that GetDefaultFolder method to work reliably by applying it there, because other than how I wrote it above, it is erroring for me no matter how I’ve declared olFolderInbox and onjInbox. ObjNameSpace.GetDefaultFolder(olFolderInbox) ‘application object interface if it is closed. ‘Activate Outlook if is already open, or display Outlook’s Set objNameSpace = objOutlook.GetNamespace(“MAPI”) Set objOutlook = CreateObject(“Outlook.Application”) ‘Declare and establish the Object variables for Outlook. If Outlook happens to be closed, an Outlook application is created using late binding. I left it in because it is a holdover from this as-yet unposted macro that first checks to see if Outlook is already open, and if so, Outlook is activated. Your point about the unused reference to the objInbox variable is well taken. 'Release object variables from system memory. Display 'Change to Send if you want to just send it. "Here's an example for attaching the active workbook" & Chr(10) & _ CC = "Example attachment to multiple recipients" 'Display the email message with the attached active workbook. 'Remove the last two characters from the recipient string, which are With Worksheets("Sheet3") 'change sheet name where list is kept. That separates recipient addresses by a semicolon and a space. 'Loop through the recipient email addresses to build a continuous string 'for the count of cells in column A that contain email addresses. 'Declare a String variable for the recipient list, and an Integer variable
Set objMailItem = objOutlook.CreateItem(0) Set objNameSpace = objOutlook.GetNamespace("MAPI") Set objOutlook = CreateObject("Outlook.Application") 'Declare and establish the Object variables for Outlook. This macro will create an email in Outlook, attach your workbook, and write your list of recipients in the To field as seen in the following picture.
On a hidden worksheet, you can list all the recipients’ email addresses, such as I have done in column A of Sheet3. Suppose you have a workbook that you email to the same people on a regular basis. With a macro from Excel, you can create an email in Outlook that will attach your active workbook and fill in the To field with a list of multiple recipients. Tom’s Tutorials for Excel: Attach Workbook in Outlook Email to Multiple Recipients
0 kommentar(er)
