Mail to multiple users

Sumeluar

Board Regular
Joined
Jun 21, 2006
Messages
241
Hello all!


I'm using the following to e-mail excel, how can I add multiple users and if possible a popup box from where I can choose specific users?
===============================================
Dim wb As Workbook
Dim strdate As String
strdate = Format(Now, "mmmm dd yy hh-mm")
Application.ScreenUpdating = False
Sheets(Array("Breakdown Tracking Sheet")).Copy
Set wb = ActiveWorkbook
With wb
.SaveAs "Bruce Lauman's copy of " & ThisWorkbook.Name _
& " " & strdate & ".xls"
.SendMail "Mr.SoandSo@Somemail.com", _
"Breakdown Tracking Sheet"
.ChangeFileAccess xlReadOnly
Kill .FullName
.Close True
End With
Application.ScreenUpdating = False
==============================================


Kind Regards!

Sumeluar
 

Some videos you may like

Excel Facts

What is the shortcut key for Format Selection?
Ctrl+1 (the number one) will open the Format dialog for whatever is selected.

Watch MrExcel Video

Forum statistics

Threads
1,113,812
Messages
5,544,458
Members
410,613
Latest member
Texman
Top