Many times, in an office setting, you have an Excel spreadsheet that has to be sent to different departments on a weekly basis. Even if you have a distribution list setup in MS Outlook, it still takes some time to setup your e-mail and proof it before sending it out. Why not let MS Excel do it for you?

Follow the steps below to lighten your workload:

1. Launch MS Excel if it is not already open.
    
2. Open the workbook containing the report you want to send.
    
3. Click ALT + F11.
    
4. The Visual Basic Editor will open.
    
5. In the Project-VBA Project pane, double-click ThisWorkbook.
    
6. Go to Insert | Procedure.
    
7. Click in the Name text box and enter WeeklyReportEmail.
    
8. Click OK.
    
9. At the prompt, enter the code below:
    
10. Dim DistList As Variant
     
11. DistList = Array("name1@company.com", "name2@company.com", "name3@company.com") ActiveWorkbook.Sendmail Recipients: = DistList
     
12. Click ALT + Q.
     
13. Click ALT + F8.
     
14. Click WeeklyReportEmail in the Macro list.
     
15. Click the Options button.
     
16. In the CTRL+ box, enter m.
     
17. Click OK.

When it is time to send the spreadsheet to everyone on your distribution list you simply open the workbook and click CTRL + M.

When you become a member at CarolsCornerOffice.com, you have access to this and many, many more articles that include screenshots. Don't delay: visit us today!